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Pentru selectie, ii rugam pe doritori sa 
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In primul rind va transmit o | TWIN LAKES COMPUTER USER GROUP 


A 
cerere a clubului din Mil- |] HC61 Box 263 
waukee. NORFOLK, 
Presedintele MACE (MII- | ARKANSAS AR 72658 
waukee Area Commodore En- | USA 
thusists) roaga pe toti aceia | -pentru IBM si compatibile, C64&C128 
care doresc sa corespondeze cu 
acest club, sa trimita scrisorile | CONWAY PC USERS GROUP 
pe urmatoarea adresa: TOADSUCK STATION, 


MACE P.O. Box10442 
P.O. Box 26216 CONWAY 
Milwaukee WI 53226 ARKANSAS AR 72032 
USA USA 


fara a mai folosi adrese ale membrilor sai sau ale spon- | -pentru incepatori cit si pentru experti in PC-uri. 
sotului unde isi tin adunarile. Aceasta rugaminte ne este 
in mod expres adresata. 


| RANDY COLLINS 
| P.O. Box 1312 
SPRINGDALE, AR 72765 
Si acum să continuam cu publicarea altor adrese de | USA 
cluburi (din pacate, nu ne-au parvenit adresele ciubunior | -numai pentru Apple ii 
de Spectrum: daca aveti asa ceva. va rog sa ne scrieti): | 
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Ce putem sa mai cautam pentru PC? 


TEST DRIVE III 

Va propune trei masini: Chevrolet CERV III, Lambor- 
ghini DLABOLO si Pininfarina MYTHOS. Apare in 
plus: o secventa 'replay', posibilitatea de a concura mai 
multe masini, peisaje foarte atractive. Foarte frumos pe 
VGA. 

pret: 50$ 


OUT RUN 

In acest joc, limita de viteza nu exista; cu cit se ruleaza 
mai repede, cu atita faci mai multe puncte. Este o cursa 
contra cronometru; cu fiecare nou nivel. timpul probei 
scade. 

pret: 53$ 


MIDWINTER 

Un joc de strategie, genial si variat, care vrea sa 
revolutioneze conceptual desig-ul jocului modern pe 
computer. Subiectul: o noua era glaciala se instaleaza pe 
pamint; cu o grupa de cercetatori, trebuie sa incercati sa 
supravietuiti pe insula Midwinter, dar aceasta oaza in 
desertul de ghiata este in pericol de a fi invadata. Jocul 
controleaza pina la 32 de personaje pe o suprafata de joc 
de circa 160.000 de mile patrate. 

pret: 60$ (Brrrrr..... ) 


RAILROAD TYCOON 

Daca va pasioneaza lumea trenurilor, acesta este jocul 
potrivit. Aventura si romantism garantate. 

pret: 53$ 


SPORTING GOLD 
Cistigati o medalie de aur la una din cele 21 de discipline 
sportive propuse: 
ski, ciclism, patinaj, 
tir cu arcul, saritura 
in lungime, maraton, 
etc, etc... 


pret: 40$ 
OPERATIUNEA 
STEALTH 
Actiunea se  des- 
fasoara in lumea 
spionajului  interna- 


tional. De circa 7 ore, John Glames, omul care va in- 
soteste in aceasta aventura, s-a aliat serviciului secret 
american. Misiunea "Operatiunea Stealth' este de mare 
importanta, fiind in joc intregul echilibru diplomatic al 
lumii. 


pret: 46$ 



















THE COURSE OFRA 
Testati-va logica in compania lu 
RA si a celor 100 de nivele pline d 
mister. In plus, mai exista inca 75 d 
nivele contra timp, cu riscul 
cadea in vid 


pret: 46$ 


INDIANA JONES 
Aceasta aventura fantastica rei 
subiectul filmului de succes c 
acelasi nume. De data acesta i 
locul lui Harrison Ford, va afla 
dvs. si trebuie sa gasiti potirul sfin 
al lui Isus. In plus, trebuie sa-l 
eliberati pe tatal dvs, care se ames 
teca tot timpul in aventura. 
pret: 66$ 


SILENT SERVICE Il 

Este epoca marilor confruntari din perioada celui de al 
doilea razboi mondial. 

pret: 53$ 


-grupaj realizat de Mirel Dobrila- 


Ce mai cautam pentru Spectrum? 


SHADOW OF THE BEAST 
O lumea de vrajitori si groaza. 
Trebuie sa aveti inima tare pentru acest joc 


TEENAGE MUTANT HERO TURILES 

Protagonistii serialului de mare succes care a rulat 
si la noi pe micile ecrane; o grafica foarte mult 
colorata. 


GAZZA 2 -EMPIRE 
Gazza 2? - o vendetta pe calculator. 


EDD THE DUCK 
Sari cit poti, trage cit poti... . in general faci tot ce 
poti, Atit cit poti! 


NAVY SEALS 
Inamicul este peste tot, in jurul tau, pe mare. De 
atita tras, tunurile de pe nava se inrosesc. ... 


EXTERMINATOR 
Nu este numii un joc; este o simulare a realitatii care te 
inconjoara. 


BACK TO THE FUTURE III 
Continua faimoasa serie de Back-uri. 
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Spectrum 


FORIH 


-urmare din numarul trecut- 


Cele doua versiuni ale lui Spectrum Forth, V16 pentru 
Spectrum de 16K si V48 pentru Spectrum de 48K, im- 
preuna cu un joc exemplu (numai pentru Spectrum de 
48K) se afla in intregime pe caseta. V16 poate, binein- 
teles, rula si pe masina de 48K, macar ca UDG-ul 48-ului 
si memoria suplimentara nu pot fi folosite. 

Principala diferenta intre cele doua versiuni, asa cum 
poate va asteptati, este legata de memoria libera dis- 
ponibila pentru noi cuvinte si UDG-uri. 

V16 va permite definirea a cca. 114 noi cuvinte, o stiva 
de 60 item-uri si 21 UDG-uri. 

48 va permite definirea a cca. 1000 noi cuvinte, o stiva 
de 800 item-uri si 256 UDG-uri. 
Depasirea acestor limite v-ar putea cauza probleme. 
Dupa aceasta sectiune urmeaza harta memoriei si lista 
de cuvinte, separat pentru V16 si V48. Un dictionar al 
cuvintelor rezidente Spectrum Forth urmeaza listei de 
cuvinte. Nu toate cuvintele din acest dictionar sint sus- 
tinute de V16, de aceea la utilizare consultati lista de 
cuvinte pentru detalii. Desigur, anumite parti ale acestei 
sectiuni sint specifice versiunii V48. de aceea, daca aveti 
indoieli, consultati lista de cuvinte. 

Citeva cunvinte standard FORTH au fost omise si mai 

multe cuvinte ne-standard au fost adaugate. Scopul 
majoritatii acestor cuvinte ne-standard este de a face 
posibila folosirea graficelor “inchiriate” ale Spectrum- 
ului, culorilor si imprimantei. 
O trasatura a rutinei input referitoare la folosirea paran- 
tezelor () si a ghilimelelor ”" trebuie notata. Astfel, nu 
folositi ghilimele in interiorul parantezelor sau ghilimele 
in interiorul ghilimelelor. Daca se folosesc paranteze in 
interiorul ghilimelelor, nu trebuie sa existe spatiu dupa 
paranteza deschisa ( si parantezele trebuie sa fie intot- 
deauna perechi in interiorul ghilimelelor. 

Acum sa aruncam o privire asupra UDG-urilor. Dupa 
cum am mentionat anterior, in V16 puteti avea 21 UDGs 


cu o litera ca nume, aceleasi ca in BASIC (vezi cap. 14 
din manualul Spectrum). 

In versuinea 48K puteti avea 256 UDGs avind ca label 
un numar intre 0 si 255. Numerele 32-127 inclusiv sint 
utilizate de BASIC, dar celelalte sint disponibile numai 
in Spectrum Forth. De fapt, in versiunea V48, doua 
caractere au fost deja redefinite asa cum vom vedea prin 
punerea lor pe ecran. 

Pentru a defini sau redefini un caracter, folositi modul 
COMMAND si introduceti un d apoi dati UDG-ului un 
label. Label-ul trebuie sa fie o litera pentru V16 si un 
numar pentru V48. In final caracterul dorit este creat 
prin introducerea a opt linii de cuvinte binare de opt biti. 
Folositi 1 pentru a seta pixelul ON si 0 pentru a seta 
pixelul OFF. Liniile se introduc la cererea masinii si o 
imagine marita a caracterului este creata in mijlocul 
ecranului, pe masura ce liniile sint introduse. Este 
utilizata aceeasi metoda ca si in BASIC (vezi cap. 14 din 
manualul Spectrum). 

Daca folositi o imprimanta, noul caracter va fi tiparit 
cind definitia sa este completa. 

Dupa definirea caracterului sau dupa ce imprimanta se 
opreste, va reintoarce in modul command. Pentru a 
vedea cum arata caracterul (marimea sa actuala) intro- 
duceti label-ul sau. Pentru a tipari intregul set de carac- 
tere introduceti: 


»** 256 0200 EMIT LOOP; 


Pentru a defini un cuvint este folosita definitia celor 
doua puncte. Din modul command introduceti : urmate 
de un spatiu, numele noului cuvint si apoi definitia sa. 
Definitia este terminata pe calea obisnuita cu *;”. Notati 
ca numele nu trebuie sa inceapa cu un semn minus sau 
cu o cifra. Numai cuvintele valide aflate deja in dictionar 
pot fi folosite pentru definirea unui nou cuvint, adica atit 
cuvintele rezidente Spectrum Forth ca si orice nou 
cuvint deja adaugat la dictionar pot fi folosite. Un spatiu 
trebuie indus intre : si numele cuvintului, nume si 





definitia cuvintului si intre fiecare cuvint din definitie, in 
modul obisnuit. De exemplu, un cuvint pentru a ridica 
un numar la patrat trebuie definit astfel: 

e... : SOR DUP"; 

Dupa apasarea tastei ENTER, numele noului cuvint (in 
acest caz SQR) va aparea sus-stinga pe ecran, pozitia sa 
in memorie sus-dreapta si dedesubt va fi definitia sa (in 
acest caz DUP *). 

Daca folositi o imprimanta, numele si definitia vor fi 
tiparite. Notati, daca este numai o scurta definitie, puteti 
salva bhirtia imprimantei prin Breaking (shifted Space 
Key) si apoi introduceti GO TO 100 pentru a va rein- 
toarce in modul command. Noul cuvint este adaugat la 
dictionar si poate fi salvat impreuna cu restul dic- 
tionarului. 

Daca salvati dictionarul continind unul sau mai multe 
cuvinte pentru folosire ulterioara, sinteti sfatuit sa 
pastrati un record al numelor si definitiilor corespun- 
zatoare. 

Sectiunea INTRODUCERE IN FORTH va da mai 
multe detalii despre definirea noilor cuvinte. Fiecare 
cuvint folosit intr-o definitie, fie rezident, fie unul din 
propriile dvs. cuvinte, va ocupa cca. 3 bytes de memorie. 
Limita zonei de memorie pentru rutine este de cca. 1K 
pentru V16 si 20K pentru V48 (vezi harta memoriei). 


In continuare sa ne oprim asupra numarului de biti cu 
care opereaza unele comenzi. 
_— OPERATORII LOGICI - AND, OR si XOR sint 
operatii de 16 biti; NOT doar complementeaza bitul 0 al 
TOS. Daca este cerut complementul de 16 biti al lui 1 
folositi -1 XOR. 
1F, WHILE si UNTIL - testeaza numai bitul 0 al TOS. 
DO LOOP - in timpul unei bucie DO, pe stiva de return- 
uri exista 3 item-uri de control al buclei. 


YARIABILE - in versiunea V48 nu este necesar sa dec- 
larati variabilele deoarece exista deja 25 disponibile. Ele 
au label- urile A,B,C,....Y,Z dar | este exclus pentru 
folosirea in bucle. Aceste label-uri sint de fapt cuvinte si 
variabilele pot fi renumite daca este necesar. Ca sa 
depozitati TOS intr-o variabila, folositi litera (adica 
label-ul) si *!” (adica depoziteaza). De exemplu, pentru a 
seta D la 50 introduceti: 

“se 301; 

Pentru a citi variabila de stiva, folositi label-ul si (fetch). 
De exemplu, pentru a citi variabila D introduceti: 
DD, ; 

Pentru a citi direct o variabila, folositi "?". De exemplu, 
pentru a citi D introduceti: 

..D7; 

Variabilele pot fi incrementate sau decrementate 
folosind +1. De exemplu, ca sa incrementati D de la 50 si 
sa cititi rezultatul, introduceti: 

++ 50D+1D7: 

iar ca sa decrementati D de la 50, introduceti: 

+. .50D +1D?; 


Label-urile variabilelor sint cuvinte care pun o adresa 
in stiva. Functiile de mai sus pot fi folosite ca si PEEK si 
POKE in BASIC folosind o adresa in locul unui label. 
Label-urile nu sint incluse in lista de cuvinte care ur- 
meaza, dar sint listate din program folosind comanda 
VLIST. 

Folosirea codului masina. 

Toate cuvintele in Spectrum Forth (fie rezidente, fie 

definite de utilizator) sint depozitate ca rutine cod- 
masina compilate, care se cheama unele pe altele. Codul 
masina poate fi introdus la orice punct intr-o definitie 
dupa cum urmeaza: 
- din modul command, sau de la 'continue definition in- 
troduceti literele mici mc. Dupa ce ati apasat tasta 
ENTER apare prompt-ul 'mc byte:'. Raspundeti intro- 
ducind un byte de cod-masina in zecimal si apasind 
ENTER. Promptul 'mc byte: va apare din nou si puteti 
introduce un alt byte. Continuati in acest fel pina com- 
pletati codul masina apoi introduceti -1. 

Ecranul poate fi copiat la imprimanta din modul com- 
mand introducind lietrele mici: cp. 


Variabilele de sistem sint: 
DC-CC pentru pozitii de tiparire 
23681 pentru a inlocui WORD cu PAD 
23728 pentru a depozita pointer-ul stivei in SP 


HARTA MEMORIEI V16 


Adresele 0 - 23734 sint definite in manualul Spectrum 
cap. 24 

23734 - 28160 BOS & FORTH stiva de date 

28160 - 29698 FORTH dictionar 

29698 - 32600 FORTH rutine si in continuarea acestora 
BOG & FORTH stiva de return-uri 

32600 - 32768 BCS & FORTH UDG's 


HARTA MEMORIEI V48 

Adresele 0 - 23734 definite in manualul Spectrum cap. 24 
23734 - 29696 BOS & FORTH stiva de date 

29696 - 52224 FORTH rutine (aria de compilare) 

52224 - 54272 256 de UDG's fiecare pe 8 bytes 

54272 - 65368 FORTH dictionar (8 bytes pentru fiecare 
cuvint) si in continuare stiva de return-uri 

65368 - 65485 FORTH notatii PAD 

65485 - 65535 variabile 


SPECTRUM FORTH V16. 
LISTA DE CUVINTE 


OBSERVATIE; Numerele dintre paranteze se refera la 
localizarea sa in dictionar. 
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(63) 1 (5) + (4): (13) (62) C urmat de epsilon (66) P! 
(18) ABS (48a) BEGIN (26) CLS (69) DELETE (30) 
DUP (51) EXIT (83) FLASH (85) INK (46b) LOOP 
(55) MIN (17) NOT (91) OVRPLOT (92) POINT (35) 
ROT (4%) THEN (95) VLIST (77) ' (2) . (3) ; (11) = 
(6) Cl (44) R urmat de epsilon (14) AND (87) BOR- 
DER (70) CMOVE (468) DO (47b) ELSE (52) EXITLP 
(88) MIRES (58) INKEY (46c) +LOOP (9) MOD (1) 
numar (86) PAPER (49a) REPEAT (20) SPACE (72) 
TYPE (53) WAIT (57) Q (6) - (8) / (75) ? (76) C? (43) R 
(22) AT (84) BRIGHT (97) cp (29) DROP (23) EMIT 
(24) FIELD (45) I (59) KEY (54) MAX (71) MOVE 
(15) OR (33) PICK (60) RND (21) SPACES (90) UN- 
PLOT (496) WHILE (7) * (56) .* (32) (61) epsilon- 
fetch (65) P urmat de epsilon (42) R (82) ATTR (73) 
CDUMP (25) CR (74) DUMP (68) ERASE (67) FILL 
(47a) IF (464) LEAVE (98) mc (19) NEGATE (32) 
OVER (89) PLOT (36) ROLL (34) SWAP (48b) 
UNTIL (16) XOR 


SPECTRUM FORTH V48. 
LISTA DE CUVINTE 


(63) 1 (5) + (4): (13) (62) C urmat de epsilon (66) P! 
(28) ABORT (22) AT (87) BORDER (70) CMOVE 
(69) DELETE (74) DUMP (23) EMIT (52) EXITLP 
(67) FILL (45) 1 (93) INVERSE (46) +LOOP (9) 
MOD (17) NOT (91) OVERPLOT (89) PLOT (49a) 
REPEAT (20) SPACE (47c) THEN (95) VLIST (78) 
wrdach (77) * (2) -(3) ; (11) = (64) C! (44) R urmat de 
epsilon (41) IN (82) ATTR (84) BRIGHT (61) COUNT 
(37) DEPTH (30) DUP (68) ERASE (80) EXPECT (83) 
FLASH (47c) IF (59) KEY (54) MAX (10) MOD (1) 
numar (40) PAD (92) POINT (60) RND (21) SPACES 
(72) TYPE (53) WAIT (16) XOR (57) () (6) - (8) / (75)? 
(76) C? (43) R (18) ABS (94) BEEP (73) CDUMP (97) 
cp (468) DO (31) ?DUP (79) EXECUTE (96) £ (50) 
flgtst (85) INK (464) LEAVE (98) mc (71) MOVE (15) 
OR (86) PAPER (34) QUERY (36) ROLL (99) 
STKSWP (50) UNPLOT (49%) WHILE (7) * (56) .* (12) 

(61) epsilon (65) P urmat de epsilon (42) R (14) AND 
(48a) BEGIN (26) CLS (25) CR (29) DROP (47) 
ELSE (51) EXIT (24) FIELD (88) HIRES (58) INKEY 
(46b) LOOP (55) MIN (19) NEGATE (32) OVER (33) 
PICK (27) QUIT (35) ROT (34) SWAP (48b) UNTIL 
(39) WORD 


DICTIONAR SPECTRUM FORTH 


ABREVIERI: TOS (top of stack) virful stivei / 20S 
(second on stack) al doilea in stiva, 3OS etc. se refera la 
stiva de date. 

NOTA: Nu toate cuvintele din acest dictionar sint rezi- 
dente in V16 si de aceea, ori de cite ori aveti vreun 
dubiu, consultati lista de cuvinte. 


Bate indicat ca aceste exemple sa fie rulate imediat. 
va ca stiva este goala inaintea introducerii ex- 
emplului. 


(1) numar - nu este un intreg propriu-zis, orice cuvint in- 
cepind cu un digit sau cu semnul - este evaluat si pus in 
TOS. In practica orice numar intreg cu sau fara semn. 
Orice numar neintreg este rotunjit. 
EXEMPLE: -3 . ; Tipareste -3; stiva:0 

4.5. ; Rotunjeste in sus, tipareste $; stiva:0 

4.4.; Rotunjeste in jos, tipareste 4; stiva:0 


(2) . (punct) - cuvintul . tipareste TOS si in acelasi timp il 
sterge. Un semn - si virgula dupa mii sint introduse cind 
este cazul. 

EXEMPLU: 10000 . ; Tipareste 10,000; stiva:0 


(3) ; (punct si virgula) - folosit pentru a incheia toate in- 
structiunile, definitiile de noi cuvinte etc. 


(4) : (doua puncte) - este folosit pentru a crea o intro- 
ducere in dictionar. 

EXEMPLU: SQR DUP * ; Defineste un nou cuvint 
SQR care va gasi patratul unui numar (al TOS). 


OBSERVATIE: Urmatoarele S$ cuvinte reprezinta 
operatori aritmetici. Prioritatea operatorilor aritmetici 
este data de ordinea introducerii. 


(5) + (suma) - aduna 20S la TOS si pune rezultatul in 
stiva (ca TOS). 
EXEMPLU: 7 9 + . ; Tipareste 16; stiva:0 


(6) - (diferenta) - scade TOS din 20S si pune rezultatul 
in stiva 
EXEMPLU: 7 9 -. ; Tipareste -2; stiva:0 

(7) * (produs) - inmulteste TOS cu 205 si pune rezul- 
tatul in stiva. 
EXEMPLU: 6 3 * . ; Tipareste 18; stiva:0 

(8) / (impartire) - imparte 205 la TOS si pune rezultatul 
in stiva. 

EXEMPLU: 6 3 /. ; Tipareste 2; stiva:0 


(9) MOD (modulo) - executa o impartire la fel ca si / dar 
in loc sa atribuie citul rezultatului, ii atribuie restul. Este 
foarte folositor in aritmetica intreaga a FORTH-ului. 
EXEMPLU: 17 7 / ; Tipareste 2; stiva:0 


(10) /MOD - la fel ca MOD dar ne da atit citul cit si res- 
tul ca rezultat. Citul este depozitat ca TOS iar restul ca 
20. 

EXEMPLU: 17 7 /MOD. CR. ; Tipareste 2, trece in rin- 
dul urmator si tipareste 3, stiva:0 


OBSERVATIE: Urmatoarele 3 cuvinte sint operatorii 
de comparatie. 
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(11) = (egalitate) - compara 20S cu TOS. Rezultatul 
este 1 pentru TRUE si 0 pentru FALSE si este depozitat 
ca TOS. 
EXEMPLE: 10 =. ; Tipareste 0; stiva:0 

11=.; Tipareste 1; stiva:0 


(12) (mai mic) - compara 20S cu TOS. Daca 20S este 
mai mic ca TOS, rezultatul este 1, daca este mai mare sau 
egal, rezultatul este 0. 
EXEMPLE: 4 $ .; Tipareste 1; stiva:0 

5 4 .; Tipareste 0; stiva:0 


(13) (mai mare) - compara 20S cu TOS. Daca 205 este 
mai mare decit TOS rezultatul este 1, atifel este 0. 
EXEMPLE: 13 11 .; Tipareste 1; stiva:0 

11 13 .; Tipareste 0; stiva:0 
OBSERVATIE: Urmatoarele 3 cuvinte sint operatori 
logici, folositi pentru a combina rezultatele compararii, 
la fel ca in BASIC, Sint operatii pe 16 biti. 


(14) AND - executa o conjunctie intre TOS si 20S si 
depoziteaza rezultatul in stiva. Rezultatul este 1 daca atit 
TOS cit si 20S sint 1, altfel este 0. 
EXEMPLE: 1 1 AND . ; Tipareste 1; stiva:0 

0 0 AND. ; Tipareste O; stiva:0 

10 AND. ; Tipareste O: stiva:0 


(15) OR - executa o disjunctie intre TOS si 20$, 
depozitind rezultatul in stiva. Rezultatul este 1 daca TOS 
sau 20S este 1. 
EXEMPLE: 10 OR . ; Tipareste 1; stiva:0 

000OR. ; Tipareste 0; stiva:0 

010R. ; Tipareste 1; stiva:0 

110OR.; Tipareste 1; stiva:0 


(16) XOR (sau exclusiv) - executa functia SAU-EX- 
CLUSIV intre TOS si 20S, depozitind rezultatul in 
stiva. Rezultatul este 1 daca numai unul dintre termeni 
este 1, altfel este 0. 
EXEMPLE: 10 XOR . ; Tipareste 1; stiva:0 

00XOR . ; Tipareste 0; stiva:0 

11XOR. ; Tipareste 0; stiva:0 


(17) NOT - schimba TOS intr-un rezultat conditional 
TRUE sau FALSE prin complementarea bitului zero 
(LSB). NOT este destinat utilizarii impreuna cu IF, 
WHILE si UNTIL. 

EXEMPLU: 0 NOT . ; Tipareste 1; stiva:0 


(18) ABS - ne da valoarea absoluta a TOS, adica daca 
TOS este negativ, ii schimba semnul. 
EXEMPLE: -20 ABS . ; Tipareste 20, stiva:0 

20 ABS . ; Tipareste 20, stiva:0 


(19) NEGATE - schimba semnul TOS. 
EXEMPLE: 3 NEGATE . ; Tipareste -3; stiva:0 
-3 NEGATE .. ; Tipareste 3; stiva:0 


(20) SPACE - muta pozitia de tiparire cu un spatiu 


(21) SPACES - ia TOS si executa de atitea ori SPACE. 
AVERTISMENT: 0 SPACES inseamna 65536 de 


spatii ! 


(22) AT - folosit la fel ca in BASIC pentru a forma 
ecranul. la 20S ca numar de linie si TOS ca numar de 
coloana. 


(23) EMIT - ia TOS si tipareste caracterul SPECTRUM 
asociat similar cu CHR$ in BASIC. 


(24) FIELD - muta pozitia de tiparit inainte in ur- 
matorul “patrat” al ecranului. 


(25) CR - porneste o noua linie de tiparire. 


(26) CLS - la fel ca in BASIC, curata display-ul si 
atributele de culoare. 


(27) QUIT - reintoarce in modul command FORTH. 
(28) ABORT - curata stiva si apoi QUIT. 


(29) DROP - arunca TOS, facind stiva mai scurta cu un 
item. 

EXEMPLU: 321...CR321DR0P..; 

(30) DUP - copiaza TOS astfel ca acesta este de doua ori 
in stiva. 

EXEMPLU: 32DUP...; 


(31) ?DUP - executa DUP numai daca TOS este diferit 
de zero. 


(32) OVER - copiaza 20S pe 'TOS si impinge stiva in 
jos, adica TOS devine 20S, 20S devine 30S etc. 
EXEMPLU: 32 OVER...; 


(33) PICK - la fel ca DUP si OVER, dar copiaza orice 
item selectat al stivei. 
EXEMPLU: 40 30 20 10; 3PICK.; 


(34) SWAP 
EXEMPLU: 987SWAP...; 


(35) ROT - muta 30$ si-l pune in TOS impingind in jos, 
vechiul TOS si 20 etc. in spatiul ramas. 
EXEMPLU: 9876ROT....; 


(36) ROLL - la fel ca ROT dar pentru orice item 
specificat din stiva. Astfel 6 ROLL va pune 60S in TOS: 
impingind in jos restul stivei. 

EXEMPLU: 19 18 17 16 1214; 5ROLL...... - 
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(37) DEPTH - ne da numarul item-urilor din stiva, inain- 
tea lui DEPTH. 


(38) QUERY - introduce caractere de la tastatura in aria 
notata PAD a memoriei (vezi harta memoriei) dupa ce s- 
a apasat ENTER. Caracterul ENTER (13) este 
depozitat, pentru a marca sfirsitul datelor. Nu folositi 
mai mult de 100 de caractere ca raspuns la QUERY. 


(39) WORD - citeste un cuvint din PAD in stiva, lucrind 
in PAD de fiecare data cind este chemat. 


(40) PAD - da adresa PAD (a urmatorului cuvint din 
pad). 


(41) IN - da adresa a cit de departe a trecut WORD in 
realitate prin PAD. IN da numarul caracterelor deja 
citite de WORD. 


(42) R (TO R) - transfera un item din stiva de date in 
stiva de return. 


(43) R (FROM R) - transfera un item din stiva de return 
in stiva de date. 


(44) R urmat de epsilon (R fetch) - copiaza virful stivei 
de return in stiva de date. 


(45) 1 - variabila de ciclu intr-un DO LOOP. 1 este la fel 
ca R epsilon, virful stivei-de return fiind variabila index a 
ciclului. 


(46) DO LOOP (LEAVE) - acest tip de ciclu poate fi in- 
clus pe orice adincime. I intotdeauna se refera la ciclul 
cel mai interior, in acel punct. Notati ca un ciclu de lun- 
gime zero va fi executat de 65536 de ori. DO nu poate ex- 
ista fara LOOP sau +LOOP si viceversa. 


(46a) DO - similar cu FOR in BASIC. la TOS ca valoare 
de start si 20S ca limita a ciclului (prima valoare 
“ilegala”). Pune trei item-uri de control in stiva de return 
si prin urmare trebuie intotdeauna folosit in aceeasi 
definitie/comanda cu LOOP. 
EXEMPLU: 1001 0 DO 23 0 AT 1. LOOP; 


(46b) LOOP - similar cu NEXT in BASIC. Testeaza 
contorul ciclului cu variabila de ciclu, care este intot- 
deauna |. 

EXEMPLU: 128 0 DO 1 EMIT FIELD LOOP ; 


(46c) +LOOP - folosit in loc de LOOP intr-un ciclu DO 
LOOP. +LOOP ia TOS ca valoarea pasului ciclului 
(similar cu STEP in BASIC). Pot fi folositi numai pasi de 
incrementare pozitivi. 

EXEMPLU: 128 0 DO | EMIT FIELD 3 +LOOP ; 


(46d) LEAVE - forteaza o iesire prematura dintr-un 
ciclu DO, facind variabila de ciclu I egala cu limita 


ciclului. LEAVE trebuie sa se afle in acelasi cuvint/com- 
anda cu DO si LOOP (sau +L/00OP). 

EXEMPLU: 32 300 0 DOI + DUP EMIT DUP 127 = 
IF LEAVE ELSE THEN LOOP DROP; 


(47) IF...ELSE...THEN - un ciclu conditional. Toate cele 
trei cuvinte trebuie sa apara in acelasi cuvint/comanda. 
Nu are nici o importanta daca intre ele sint sau nu alte 
cuvinte (bineinteles d.p.d.v. sintactic). Ciclurile de acest 
tip nu pot fi interioare, dar se pot defini noi cuvinte 
reprezentind tocmai un IF interior, daca includerea este 
necesara. 

EXEMPLU: $ 5 - IF 444. ELSE 333. THEN; 


(47a) IF - ia TOS si il testeaza. Daca rezultatul este 
TRUE, cuvintele dintre dintre IF si ELSE sint executate. 
(47b) ELSE - daca rezultatul este FALSE, cuvintele 
dintre ELSE si THEN sint executate. 


(47c) THEN - in final, dupa ce s-a executat setul de 
cuvinte (47a) sau (47b), se executa cuvintele care ur- 
meaza dupa THEN. 

EXEMPLU: 5 6 IF 444. ELSE 333 THEN DOI EMIT 
FIELD LOOP ; 


(48) BEGIN...UNTIL - un alt ciclu conditional si (la fel 
ca IR- urile) nu pot fi interioare. 


(48a) BEGIN - marcheaza inceputul ciclului. 


(48b) UNTIL - marcheaza sfirsitul ciclului si trebuie sa 
fie precedat de o conditie. Cuvintele dintre BEGIN si 
UNTIL sint executate pina cind (UNTIL) conditia este 
adevarata. 

EXEMPLU: 819 BEGIN DUP. OR 2/DUPO0 = 
UNTIL ; 


(49) BEGIN...WHILE...REPEAT - ciclu asemanator cu 
cel de mai sus BEGIN - marcheaza inceputul ciclului. 


(49a) REPEAT - marcheaza sfirsitul ciclului si nu este 
conditional. 


(49b) WHILE - este folosit pentru a testa o conditie si 
executia unui LOOP continua atita timp cit conditia este 
adevarata. Asigura iesirea din ciclu cind conditia devine 
falsa. 

EXEMPLU: 8192 BEGIN DUP 1 WHILE DUP. 61 50 
47 EMIT EMIT EMIT 2 DUP. CR REPEAT DROP ; 


(50) flgtst - citeste bitul zero al TOS si seteaza flag-ul Z 
corespunzator. Este folosit de IF, WHILE si UNTIL 
Prin urmare acestea citesc numerele pare ca FALSE si 
numerele impare ca TRUE. 


(51) EXIT - cind este folosit intr-o comanda de definire, 
determina abandonarea cuvintelor care urmeaza dupa 
EXIT. Nu poate fi folosit intr-un ciclu DO. 
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EXEMPLU: 5 4EXIT 3.2.1.; 


(52) EXITLP - la fel la EXIT dar pentru a fi folosit intr- 
un ciclu DO. 

EXEMPLU: 100 0 DO 1. FIELD 1 10 = IF EXIILP 
ELSE THEN LOOP ; 


(53) WAIT - opreste executia pina cind se apasa tasta Y; 
un bloc in "flashing” in coltul dreapta-jos al ecranului va 
aminteste ca, computerul asteapta. 


(54) MAX - ia TOS si 20 si-l pune inapoi in stiva 
numai pe cel mai mare dintre cele doua. 
EXEMPLU: 5 6 MAX .. FIELD 65 MAX. FIELD; 


(55) MIN - ia TOS si 20S si-l pune inapoi in stiva doar 
pe cel mai mic dintre cele doua. 

EXEMPLU: $ 6 MIN . FIELD 5 6 MIN.FIELD; 

(56) .” «tipareste un sir. Sirul de tiparit trebuie sa aiba 
ghilimele inainte si dupa si sa fie precedat de punct (.”). 
EXEMPLU: . "dot-quotes." CR ."lucreaza pentru spatii si 
siruri." 


(57) Q - orice se introduce intre paranteze va fi ignorat 
in FORTH, la fel ca si in declaratiile REM din BASIC. 
Revedeti regulile privind includerea parantezelor. 


(58) INKEY - pune in stiva valoarea ASCII a tastei 
apasate sau 255 daca nu s-a apasat nici o tasta. 


(59) KEY - asteapta ca o tasta sa fie apasata si apoiiii 
pune valoarea in stiva. 
EXEMPLU: 100 0 DO KEY EMIT LOOP ; 


(60) RND - plaseaza un numar aleator intre 0 si 255 in 
stiva. 
EXEMPLU: 60 0 DO RND . FIELD LOOP ; 


(61) semn lizibil - cauta adresa aratata de TOS si pune 
numarul de 2 bytes de la aceasta in stiva. 


(62) C urmat de acelasi semn - la fel ca mai inainte dar 
este adus in stiva un singur byte. 


(64) C! - depoziteaza byte-ul cel mai putin semnificativ al 
205 la adresa indicata de TOS. 


(65) P urmat de semnul de la (61) - instructiune de con- 
trol al portului IN. Aduce numarul din port (adresa por- 
tului este TOS) si-l depune in stiva. 


(67) FILL / (68) ERASE / (69) DELETE / (70) CMOVE 
/ (1 MOVE 


(72) TYPE - tipareste pe ecran (ca fiind caractere) un 
numar de bytes indicat de TOS, incepind cu adresa in- 
dicata de 20S. 

EXEMPLU: $000 3 TYPE ; 


(73) CDUMP - tipareste pe ecran un listing cu lungimea 
indicata de TOS, a adreselor si continutul, incepind de la 
„in TOS. Cuvintul WAIT este incorporat in aceasta 
comanda, fiind necesar sa se apese tasta Y pentru ca lista 
sa fie tiparita. 


(74) DUMP - la fel ca CDUMP, dar continutul de 2 bytes 
al adresei este tiparit afara. 


(75) ? - tipareste pe ecran valoarea de 2 bytes depozitata 
la adresa indicata de TOS. 


(76) C? - la fel ca ? dar tipareste numai un singur byte. 


(77) ? (sau FIND) - pune, ca rezultat, in stiva adresa ur- 
matorului cuvint (rutina) din comanda/definitia curenta, 
cuvintul in sine fiind apoi executat. Se defineste doar 
pentru a gasi cuvinte noi (nu pentru cuvinte rezidente). 
(78) wrdsch - cauta cuvintul al carui nume este depozitat 
pe 6 bytes la 23264 (in dictionar) si inapoiaza adresa (0 
daca cunvintul nu este gasit). Fiecare cuvint de dictionar 
consta din 6 bytes, numele cuvintului, urmat de 7 bytes 
de adrese de compilare. 


(79) EXECUTE - determina un salt la adresa TOS. 


(80) EXPECT - introduce un numar de pina la TOS 
caractere de la claviatura si le depoziteaza la adresa in- 
dicata de 20S. Introducerea poate fi incheiata mai dev- 
reme prin introducerea lui ENTER, in acest caz ENTER 
fiind depozitat pentru a marca sfirsitul item-ului. 


(81) COUNT - se foloseste cu un tabel de bytes in care 
primul byte contine lungimea tabelului. Adresa tabelului 
este TOS. TOS este incrementat si lungimea tabelului 
este plasata deasupra lui in stiva. 


(82) ATTR - converteste un numar de coloana dat de 
TOS si un numar de linie dat de 20 intr-o adresa in 
fisierul de atribute. 


(83) FLASH / (84) BRIGHT / (85) INK / (86) PAPER - 
aceste 4 cuvinte sint similare cu cele din BASIC dar 
schimba statutul unei singure celule de caracter si de 
aceea se folosesc in cicluri. Celula de caracter modificata 
are adresa data de 20OS si coloana data de TOS iar 
operationalul este in 3OS si trebuie sa fie o valoare ca 
cea care ar fi folosita in BASIC-ul Spectrum. ATTR este 
utilizat la definitia acestor cuvinte. 


(87) BORDER - la fel ca in BASIC, culoarea marginii 
ecranului. Data operational este TOS si trebuie sa fie 0 - 
E 


(88) HIRES - folosit in definirea urmatoarelor 4 cuvinte. 
la coordonatele hires x din TOS, y din 20S si seteaza 
DE-CC sa aiba bit-ul continind acest pixel, lasind de 8 
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ori numarul bit-ului pe stiva de date. x = 0 - 255 siy =0 
- 191. 


(89) PLOT - folosit de obicei in cicluri. Coordonatele 
pixelului sint date de HIRES. 


(90) UNPLOT - schimba pixelul la culoarea hirtiei. 


(91) ca si OVER din BASIC, comuta pixelul de pe 
culoarea cernelii pe culoarea hirtiei sau invers. 

(92) POINT - testeaza pixelul si pune in stiva 1 pentru 
ON si 0 pentru OFF. 

(93) INVERSE - inverseaza intregul set de caractere. 
(94) BEEP - pentru a controla beep-ul, ia 20S ca durata 
si TOS ca inaltime. Aceeasi durata a inaltimii va da 
mereu aceeasi inaltime dar durata depinde atit de 20S 
cit si de TOS. 


(95) VLIST - listeaza numele tuturor cuvintelor din dic- 
tionar, atit rezidente cit si nou definite. Cursorul care 
pilpiie jos in dreapta ecranului aminteste ca tasta Y 
trebuie apasata pentru a desface lista sau pentru rein- 
toarcerea in modul command. 


(96) f (forget) - folosit pentru stergerea cuvintelor din 
dictionar. Se introduce cu f mic si apoi numele cuvintului 
care trebuie "uitat". Forget sterge cuvintul numit si toate 
cele care au fost definite pe baza acestuia. 

(97) cp - copiaza ecranul la imprimanta. 


(98) mc - pentru intrarea in cod masina. Poate fi folosit 
in timpul comenzii sau definitiei. 


(99) STKSWP - folosit prima data face ca SP sa arate 
catre stiva de date. Daca este utilizat dupa aceea, face SP 
sa indice inapoi la stiva de return. 
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15 SFATURI DE AUR 
PENIRU JOCUL. 
PIRATESI!! 

Radu Davidescu 


1) Daca nu ati dat bine codul veti avea parte numai de 
puscarie toata viata. 

2) Toate specializarile sint bune, dar cele mai folositoare 
sint in spada si tunuri. 

3) Este mult mai bine sa fii bine vazut de toata lumea 
decit sa te dedici unei singure coroane. 

4) Nu alerga dupa bani, titluri sau pamint - daca le meriti 
le vei primi sigur. 

5) Daca o intilnesti o nava in apele ei teritoriale si nu ai 
nici un grad oferit de coroana respectiva incearca sa eviti 
conflictul armat. 

6) Alegeti-va intotdeauna nava potrivita pentru atacul 
potrivit. Navele sint de mai multe feluri: 

- mare tonaj, distrugatoare : WAR GALLEON 

- rezistente si fiabile, pentru atac de scurta durata : 
FRIGATE 

- foarte rapide si manevrabile dar si vulnerabile : 
BARGE 

7) Orasele pot fi atacate si pe uscat. Este bine ca de 
obicei sa va atacati adversarul din paduri. Nu stati in 
teren descoperit. 

8) Fetele guvernatorilor sint foarte frumoase si 
atragatoare. Puteti sa le cereti in casatorie dar apoi nu va 
luptati cu cel care le curteaza. Astfel vor deveni amantele 


si informatoarele dvs. Va vor folosi mai mult decit daca 
va veti casatori. 

9) Daca moralul echipajului scade atunci "rariti” cit mai 
subtil membrii echipajului si apoi impartiti prada. 

Inainte de asta vindeti toata marfa si pastrati-va numai o 
singura nava (cea mai buna). 

10) Nu fugiti din fata piratilor ci luptati-va cu ei. Faceti-i 
sa se predea. Daca prindeti un HUNTER-PIRATE sau il 
faceti sa se predea, echipajul va fi foarte fericit. 

11) Nu va neglijati familia - daca o gasiti, satisfactiile vor 
fi mari si nu numai sentimentale. 

12) Comorile gasite vor ferici si ele echipajul. 

13) ..si totusi in toata atitudinea dvs. ramineti cel mai 
crud pirat, atacati nave numai de dragul de a le distruge 
in totalitate, nu va uitati la bani si nu va ginditi mult pina 
sa atacati orasul unui guvernator care v-a jugnit. Fiti cel 
mai de temut dusman. Asta trebuie pentru a ajunge sfet- 
nicul regelui. Si poate (dupa sesiuni sau teze pierdute), 
urcind treapta cu treapta veti ajunge in virful piramidei. 
14) Si inca ceva, dupa ce terminati un joc ca PIRATES 
vedeti sa nu ajungeti si in viata acelasi ingimfat, crud si 
neindurator pirat... 

15) Pentru PIRATES varianta C-64 daca nu puteti intra 
in port pentru ca sinteti certat cu guvernatorul, atunci in- 
trati in oras, inchideti drive-ul si dati SAVE GAME. 
Apoi veti deschide din nou unitatea de floppy si dati 
RUN din BASIC. Nu va jucati cu programul (chiar daca 
e scris in BASIC). Mai bine intrati inapoi in program si 
ca prin minune veti intra nu in oras ci in port. Astfel vin 
oamenii, hartile, puterea... 
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Commodore Nota: Valoarea din PC este incrementata cu 1 
PC «——(PC)+1 


HEX: 60 (numai implicit) 


Flag: NOEFECT 





hobBIT nr.2- ADC, AND, ASL SBC 
hobBIT nr.3- BCC, BGC, BEQ, BMI, BNE, BPL, BRK, | Substract with carry 
BVC, CLC, CLD, CLI, CLV 

hobBIT nr.4- CMP, CPX, DEX, DEY, EOR, INC, INX, | Functiune: 

ȘI 
hobBIT nr.5- IMP, JSR, LDA, LDK, LDY, LSR, NOP, 

ORA Format: 
hobBIT nr.1(6)- PHA, PHP, PLA, PLP, ROL, ROR [| 11ibbboi| O ADR/DATA | ADR | 


A 


RTI 
Return from interrupt 
Format: 

| 01000000 | 


Reintoarce valorile registrilor de stare P si ale PC-ului 7 
dupa o intrerupere. DATA 





Codul comenzilor: 
HEX: 40 (numai implicit) Absolut 11101101 HEX=ED 
bbb=011 
FLAG: Pagina-Zero 11100101 =RS 
N V B D [i Z „o: marie SA 
bbb=010 
Absolut, X 11111101 HEX=FD 
bbb=111 
RTS Absolut, Y 11111001 HEX=F9 
: bbb=110 
Return from subroutine (Indirect, X) 11100001 HEX=E1 
alee pepe (indirect. Y) poa HEX=F1 
AER nica) bbb=100 
intoarce valorile registrilor de stare P si ale PC-ului dupa Pagina Zero, X paratei HEX=FS 


un salt intr-o subrutina (JSR). 
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Set carry Store accumulator in memory 
Functiune: Functiune: 
Ce M «— (4) 
Format: Format: 
00111000 1005bb01 | ADR | ADR 
Seteaza valoarea din 'carry' la 1. Se introduce valoarea din acumulator in memorie la 
adresa ADR. 


HEX = 38 (numai implicit) 


Flag: C 


i IN 
SED 
Set decimal mode Flag: NO EFFECT oii 


Functiune: 
D+—l Codul comenzilor: 
Format: Absolut 10001101 HEX=8D 


| 11111000 | bbb=011 


Pagina-Zero 10000101 HEX=85 


Introduce in 'flag-ui' D valoarea 1 (lucrul in mod bbb=001 
decimal: ADC si SBC) Absolut, X 10011101 HEX=9D 
bbb=111 
HEX=F8 (numai implicit) Absolur, Y 10011001  HEX=99 
bbb=110 
Flag: (Indirect, X) 10000001 HEX=81 
[1] bbb=000 
(Indirect, Y) 10010001 HEX=91 
bbb= 100 
'agina-Zero, X 10010101  HEX=95 
bbb=101 
SEI 
Set interrupt mask 
Functiune: STX 
caza | Set X in memory 
Format: 
01111000 Functiune: 
M=+— (X) 
Introduce valoarea 1 in registrul de stare P. Format: 


Reset-ul are acelasi efect cu SEI. 100bb110 | ADR | ADR | 


HEX=78 (numai implicit) 
Introduce valoarea registrului X in memorie. 


Flag; | 
Flag: NO EFFECT. 
Absolut 10001110 HEX=8E 
bbb=01 


VA URMA 
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Bogdan Baliuc 


O idee foarte buna, o grafica de exceptie, o animatie 
bine pusa la punct, iata numai citiva din factorii care fac 
din "WING COMMANDER" un joc deosebit. 

In anul 2xxx..., dupa terminarea Academiei, esti repar- 
tizat pe “carrier“-ul terestru TCS Tiger's Claw in timpul 
razboiului cu Kilrathi. Ca pilot incepator vei zbura pe o 
nava de lupta (un "fighter”) de tonaj mic de tip Hornet. 

Ti se vor incredinta diverse misiuni in spatiu, pe care 
daca le vei indeplini cu succes, vei fi avansat. Avansat in 
grad, dar vei lupta si pe nave mai perfectionate. 

In "WING COMMANDER: se zboara in "wing”, 
adica cite doua nave. Nava ta, a “wingleader"-ului, 
trebuie sa indeplineasca misiunea, iar nava cealalta, a 
“wingman"-ului, este insarcinata cu protectia 
"wingleader"-ului. 

Pe fiecare "wingman” te poti baza mai mult sau mai 
putin, fiecare are calitati, dar si lipsuri. De exemplu cit 
zbori pe Hornet o ai de partenera pe Spirit, alias Lt. 
Toda Marikko. Spirit este un pilot cu experienta, iar la 
nevoie este gata sa se sacrifice pentru a-si apara 
“wingleader'-ul. 

Pe Scimitar (a doua nava pe care o vei pilota) il vei 
avea drept "wingman" pe Paladin, un batrin pilot pe cale 
de a iesi la pensie. Desi este pilotul cu cea mai mare ex- 
perienta de pe Tiger's Claw (sau poate tocmai de aceea) 
Paladin nu va risca niciodata in mod inutil, nici macar 
pentru a va salva. 

Doi tintasi de elita cu care veti zbura pe rind sint 
Angel, alias Lt. Jeanette Devereaux si Bossman. Angel 
trebuie protejata, deoarece se arunca in focul advers fara 


prea multa atentie, in timp ce Bossman isi poarta de 
regula singur de grija. 

In ceea ce priveste navele: prima nava pe care veti 
zbura este Hornet-ul. Este o nava usoara, dar manev- 
rabila, dotata cu tunuri laser si rachete de tip "Dart 
Dumb-Fire”. A doua nava este Scimitar-ul. De tonaj 
mediu, este ceva mai bine inarmata, dispune de tunuri 
"mass driver” care desi au raza mai scurta sint mai efi- 
ciente, de rachete de tip "Dart DF” si "Javelin Heat- 
Seeker”. 

Din pacate este mult mai putin manevrabila decit Hor- 
net-ul si deci mai greu de pilotat. O alta nava pe care vei 
zbura este Raptor-ul. Este un “fighter” de tonaj mare, cu 
o armura solida si cu arme capabile. Pe linga tunul "mass 
driver“ exista si un tun neutronic, de raza mica, dar 
eficienta mare. O mare varietate de rachete imbogateste 
armamentul Raptor-ului. 

In sfirsit ultima din cele patru nave care aparin 
“WING COMMANDER” este Rapier-ul. Rapier-ul este 
o nava de lupta de tonaj mediu, foarte rapida, foarte 
manevrabila, cu scuturi puternice, dar cu armura slaba, 
foarte vulnerabil 
deci la atacuri 
din flanc, sau 
dupa o batalie in- 
delungata cind 
scuturile sint dis- 
truse. Este dotat 
cu tunuri laser si 


n mea om mp emma premmmeai acnee e see 


Na 








Mia v: 


eră, tipurile, inclusiv 
IN "Pilum Friend-or- 


"Spiculum Image-Recognition”. 
In fine, citeva sfaturi pentru pilotii incepatori si mai 
putin incepatori. 

- cind il veti intilni pe Bhurak The Starkiller, unul 
dintre cei mai buni piloti ai Kilrathi-lor, reduceti viteza 
la zero si trageti stind pe loc si rotindu-va pina cind 
Bhurak se va plictisi si va pleca. Nu incercati sa-l dis- 
trugeti zburind, ci asteptindu-l sa vina; 

- salvati situatia dupa fiecare misiune indeplinita. Dace 
nu reusiti sa indepliniti o misiune, reluati din ultima 
pozitie salvata. 
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Cine ia ultimul cistiga... 


dar nu este asa de 
simplu cum pare. 


Linia de comanda are 
formatul: 

COMMAND : gn 

g - numele gramezii din 
care se ia 

n - cite obiecte mai 
ramin in gramada 
Succes... pentru ca al- 
goritmul este destul de 
putemic. 


hobBIT 


by Mihai Moldovan - Colegiul national! "Sf. Sava" 


10 
20 
30 
40 


LET s =0:FORI=1T029 

READ x : POKE 23299+1i,x : LET s = s+x 
NEXT i 

IF s3093 THEN STOP 


50 DATA 33, 255, 91, 1, 0, 9, 89, 126, 171, 95, 126, 185, 
56, 2, 79, 85, 45, 16, 244, 106, 123, 94, 171, 119, 187, 
216, 115, 53, 201 


100 
115 


PRINT 41;'READY' 

BEEP .01,1 : IF INKEY$ =" THEN GO TO 115 
CLS : INPUT "NIM (2-9)";m : 

IF m OR m9 THEN GO TO 120 

FOR | =m+1 TO 9: POKE 23552-1,0 : NEXT 
INPUT "PROBLEM/Ay:*; LINE a$ 

IF a$ "y' THEN GOTO 200 

FORi=1TO0m 

INPUT "." + CHR$(96+|));a 

IF a OR a9 THEN GO TO 145 

POKE 23552-l,a 

NEXT i: GO TO 380 

FOR i = 1 TO m: POKE 23552-i,INT (RND*9+1) : 
NEXT i 

GOSUB 1000 

INPUT "COMMAND : “; LINE v$ 

IF LEN v$2 THEN GO TO 300 

LET x = CODE v$(1) : LET y = CODE v$(2)-48 
IF xa OR x105 OR y THEN GO TO 300 

LET a = 23552-x+96 : LET p = PEEKa 

IF p=0 OR py THEN GO TO 300 

POKE a, y 

GOSUB 1000 : IF NOT s THEN PRINT AT 15,3; 
"YOU NIM" :GO TO 100 

RANDOMIZE USR 23300 

GOSUB 1000 : IF NOT s THEN PRINT AT 15,3; 
"YOU NOT NIM" : GO TO 100 

GO TO 300 


1000 LET s =0:CLS:FORI=1T09: 


LET p = PEEK (23552-1): LETs=s+p 


1010 IF po THEN PRINT AT 15,3*1; CHR$ (96+1);p 
1020 NEXT i : BEEP .1,40 : RETURN 
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ZHE__CONEESSION 


by GABISOFT (ex ELSTAR) 


La numeroase jocuri pentru a putea ajunge la nivelul 
dorit, trebuie sa demonstrezi ca meriti aceasta favoare, 
introducind corect "the password”. Ori aceasta 
presupune parcurgerea cu succes a tuturor etapelor 
anterioare, ceea ce de obicei inseamna zile intregi de 
"butonare” serioasa si uneori chiar putin noroc. 

Problema se complica si mai mult in cazul unor jocuri 
de conversatie (HACKER, RETURN to ITHACA) in 
care cuvintele-cheie sint extrem de greu de ghicit. 
Publicarea password-urilor pentru fiecare joc in parte ar 
necesita un imens spatiu tipografic. 

De aceea propun tuturor curiosilor sa cunoasca 
nivelele unui joc fara a o merita pe deplin, cit si celor 
care din lipsa imaginatiei au fost nevoiti sa treaca cu 
vederea unele game-uri, citeva solutii de rezolvare a 
problemei "Enter the password:”. In general toate 
mesajele utilizate sint codificate ASCII iar pentru lis- 
tarea lor se poate utiliza programul urmator: 


10 FOR K = 0OTO 13:READA: 
POKE 23296+K,A : NEXT K 
20 DATA 55, 221, 33, 168, 97, 62, 255, 17, 64, 156, 
205, 86, 5, 201 
30 CLS : POKE 25e3,131: RANDOMIZE USR 23296 
40 IF PEEK 25e3 = 131 THEN PRINT "HEADER" : 
PAUSE 50: GO TO 30 
50 LET A$=" : FOR K = 25e3 TO 65e3 
55 IF PEEK K = 0 THEN BEEP .01,0 
60 IF PEEKK 31 AND PEEKK 123 THEN LET A$ = 
CHR$ PEEK K + A$: GO TO 90 
70 IF LEN A$ 2 THEN PRINT PAPER 5;A$ 
8 LET A$ =" 
90 NEXT K 


Programul poate fi utilizat atit pentru blocuri de tip 
"PROGRAM" cit si pentru cele de tip "BYTES". Modul 
de utilizare este foarte simplu dupa activarea 
programului decodificator (RUN) se incarca normal 
blocul pe care dorim sa-l citim. La sfirsitul incarcarii, pe 
display vor fi afisate pe rind toate mesajele continute in 
bloc. Incheierea citirii este semnalizata printr-un beep 
continuu, lung, in difuzor. La incarcare, header-ul este 
ignorat. 


Lungimea maxima a blocului citit este de 40K. Acesta 
se incarca incepind de la locatia 25000. Programul a fost 
testat cu rezultate foarte bune pe jocurile SABOTEUR, 
IMPACT, REPTON, HACKER, cu precizarea ca la 
HACKER linia 50 a tost inlocuita cu: 


50 LET AŞ = ”: FOR K = 65e3 TO 25e3 STEP-" 
si aceasta pentru ca mesajele sint scrise pe dos. 

Dezavantajul principal al acestui program este (pe 
linga memoria destul de mica), viteza redusa cu care se 
face citirea (afisarea unui bloc de 40K dureaza peste 10 
minute). 

O ameliorare a acestor efecte se poate obtine cu un 
mic program in limbaj masina. Memoria utilizata pentru 
incarcarea blocului creste la 41750 bytes, afisarea facin- 
du-se la fiecare apasare a unei taste oarecare. Timpul de 
citire se reduce la citeva zeci de secunde. Asamblarea 
programului se face cu GENS 3M21: 


ORG 23296 
LOAD: LD A,255 

ScF 

LD IX,23755 

LD DE,41750 

LD SP,65535 

CALL 1366 

JR NC,LOAD 

LD HL2375$ 

PUSH HL 
CIC: LDA,2 

RST 16 

LD AAA 

RST 16 

LD A,0 

RST 16 

LD HL,(SP) 

LD A,(HL) 

CP 32 

JP M,CONT 

CP 12 

JP P,CONT 

RST 16 

JR PAST 
CONT: CALL 3190 
PAST: POP HL 

INC BL 

LD DE,65500 

SBC BL,DE. 

LD A,L, 

OR H 

JR Z,LOAD 

ADD BLDE 

PUSA AL 
WAIT: CALL 654 
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LD A,255 presupur.e descoperirea cheii, ceea ce de multe ori nu e 
un lucru prea simplu. 'Totusi, daca vrei... 


CP E 
Pentru jocul HACKER, parola de intrare este 
13 ANA AUSTRALIA. Pe parcursul jocului, pentru a scapa cu 
JR CIC fata curata de controlul international, trebuiesc cunos- 
cute 4 password-uri: 
Programul se lanseaza obligatoriu cu LEVEL 1: SECURITY CHECK 
PRINT AT 0, 0; USR 23296. IDENTIFY COMPANY NAME : MAGMA, LTD 


Unele jocuri pot avea mesajele mascate prin codificari | LEVEL 2: SRU MODEL : AXD-0310479 


rigoare (RETURN to ITHACA) pe 5 sau 6 | LEVEL 3: MOTOVATOR TYPE : HYDRAULIC 
iti sau dupa o regula “secreta”. In acest caz citirea LEVEL 4: AUSTRALIA 


De aici inainte, jocul pare mult mai usor... 


SABOTEUR 


map 
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Solutia completa 
by Emil Matara 


Hi, pals, here | go again | Va 
propun acum un arcade-adventure 
excelent... 

Magicland Dizzy face parte din 
celebra compilatie "DIZZY COLEC- 
TION" care a fost catapultata pe 
piata de nu mai putin celebra 
"CODE MASTERS" HOUSE si care 
a fost evaluata de mai toate revis- 
tele de specialitate pe toate 
masinile intre 92 - 94%. 

Asta cam spune totul despre 
calitatea celor 4 jocuri pe care imi 
face placere sa le reamintesc aici: 
DIZZY, TREASURE ISLAND DIZZY, 
FANTASY WORLD  DIZZY si 
MAGICLAND DIZZY. 

De cel din urma (fara sa mai pier- 
dem vremea) ma voi ocupa acum, 
dezvaluindu-va toate  poantele 
pentru a-l duce la bun sfirsit, mai 
putin harta care s-ar intinde pe un 
spatiu tipografic considerabil. Deci, 
here we go... Tu esti DIZZY, of 
course |! Povestioara incepe cam 
Vrajitorul rau ZAK prin vraji e- 
xecutate cu ajutorul unui inel 
magic i-a transformat pe DYLAN, 
GRAND DIZZY, DORA, DOZZY in 
diferite obiecte, i-a adormit sau i-a 
inchis in diferite locuri stranii. Task- 
ul tau este sa ii eliberezi pe toti de 
sub puterea vrajii si sa-i distrugi pe 
ZAK vrajitorul si inelul magic. 

Jocul incepe prin materializarea 
ta in locul numit WEIRDHENGE. De 
aici incepe si colectarea celor 30 
de diamante care trebuiesc date la 
sfirsitul jocului lui LUCIFER. Mergi 
stinga un screen, ia BACKDOOR 
KEY si mai mergi trei screen-uri 
spre stinga prin BUSHY GROVE, 
YE OLDE WELL si CASTLE BACK 
DOOR (aici ajungi mergind pe dor- 
sala rechinului). 

Deschide usa cu cheia dar nu 
lua traista si sticla de lapte goala 
(nu-ti vor folosi la nimic pe parcur- 
sul jocului), mergi inca un screen 
la stinga, ia HANDLE, mergi sus, 
apoi doua screen-uri la stinga si iar 
sus si ia POWER PILL. Apoi jos, 
doua screen-uri la dreapta, iar jos 
si iar doua screen-uri la dreapta si 





lasa HANDLE pe ghizdul din stinga 
al fintinii. la galeata (BUCKET) si 
mergi apoi sapte screen-uri la 
dreapta, sarind pe platformele mis- 
catoare de pe apa (care nu tin mai 
mult de 2 secunde !). Fantomele 
dispar imediat cind se lovesc de 
tine daca ai POWER PILL. 

Ai ajuns acum la THE HOT 
WATER GEYSER si umpli BUCKET 
cu apa fierbinte, dupa care te intor- 
cl inapoi la stinga un screen. la 
DRINK ME  POTION, arunca 
POWER PILL si mergi doua 
screen-uri la stinga. la-o pe DORA 
FROG si mergi spate screen-uri la 
stinga. Da-i-o pe DORA FROG lui 
PRINCE CHARMING care o saruta, 
rupe vraja si DORA revine la forma 
initiala, plecind fericita cu printul (ai 
inceput deja sa salvezi per- 
sonajele). Mergi un screen la stin- 
ga, loveste SWITCH si o platforma 
mobila se va pune in miscare 
peste riu. Mergi pe ea inca trei 
screen-uri la stinga, lasa jos DRINK 
ME POTION si BUCKET. 

Mergi acum cinci screen-uri la 
dreapta, apoi sus si iar trei screen- 
uri la dreapta. Atentie aici, trebuie 
sa mergi pe nori (care nu tin decit 
tot vreo 2 secunde) «si atentie la 
pasarea care patruleaza in zona 


(cind te loveste iti ia din pretioasa: 


energie). Cind gasesti un diamant 
nivelul de energie iti creste sen- 
sibil. Ai ajuns undeva pe niste plat- 
forme prin copaci de unde lei 
STICK. Atentie aici la o maimuta 
care arunca cu nuci de cocos care 
daca te lovesc iti iau o parte 
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serioasa de energie. Mergi sus si 
sari la dreapta pe MONOLITH de 
unde lei BLACK CAT (nu melodia 
lui Janet Jackson). 

De aici cazi dreapta pe 
WEIRDHENGE si iei DAGGER, din 
nou pe pamint dupa acest periplu 
aerian, mergi doua screen-uri la 
dreapta si da-i BLACK CAT bunei 
vrajitoare GLENDA (care o pier- 
duse si o cauta disperata). Drept 
recompensa, Glenda iti va prepara 
o fiertura care te va ajuta sa-l 
readuci la realitate pe DYLAN, 
transformat de ZAK intr-un tufis. 

Mergi acum patru screen-uri la 
stinga si cu DAGGER tai o frunza 
din tufisul lui DYLAN dar las-o linga 
el, n-o lua inca. Mergi acum opt 
screen-uri la stinga. Cu DAGGER 
tai sfoara cu care este legata 
caprita dar aceasta sta pe loc. 
Pentru a o face sa o zbugheasca 
cu coarnele inainte trebuie sa pui 
batul pe ea (cam nedelicat dar 
este, credeti-ma, singura 
posibilitate de a continua jocul). 

Deci foloseste STICK iar caprita 
va tisni inainte pe pod si efectiv il 
va pulveriza pe TROLL-ul care iti 
bareaza trecerea. Lasa jos DAG- 
GER (nu-ti mai foloseste la nimic), 
mergi cinci screen-uri la dreapta, 
sus si apoi un screen la stinga. la 
CROSS, mergi un screen la dreap- 
ta, jos si cinci screen-uri la stinga, 
ia din nou BUCKET si DRINK ME 
POTION si mai mergi doua screen- 
uri la stinga. Arunca apa fierbinte 
pe DENZIL care are nevoie de asa 
ceva, fiind incastrat intr-un bloc de 
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gheata (ai mai salvat un personaj). 
Drept recunostinta DENZIL ti va da 
un PERSONAL STEREO (un fel de 
walkman) dar nu-l lua inca. Mergi 
doua screen-uri la stinga si 
coboara doua screen-uri jos 
(scuzati pleonasmul, dar vreau sa 
fiu cit mal precis). Aici pe undeva 
se afla o vampira care iti copiaza 
miscarile si la prima atingere te dis- 
truge. Singurul obiect care o tine 
intr-un colt la respect este CROSS, 
asa ca ai grija sa o ai cu tine. Aici 
unde ai ajuns ia BURNING TORCH 
de pe peretele din dreapta screen- 
ului. Mergi dreapta un screen 
(pentru ca in acest moment o usita 
secreta s-a deschis si ai ajuns la 
“tebletea' ta - DAISY - pe care 
acum o salvezi dindu-i sa bea 
DRINK ME POTION). Sa nu-i dai 
cumva sa manince pentru ca 
DAISY va creste pina va umple 
toata camera, strivindu-te. 

Mergi acum un screen stinga, 
doua screen-uri sus si doua la 
dreapta. la acum PERSONAL 
STEREO si lasa jos CROSS, mergi 
trei screen-uri la dreapta si ia 
POISONED APPLE. Mergi acum 
patru screen-uri dreapta, sus si 
patru screen-uri stinga, sarind pe 
fereastra castelului undeva pe 
niste platforme prin copaci. Dai 
PERSONAL STEREO bardului care 
pina atunci te ignora si acesta iti va 


patru screen-uri in sus pina pe 
acoperis de unde iei LIGHTING 
ROD  (paratrasnetul). Jos doua 
screen-uri si apoi dreapta inca 
doua si ia CLOTH DUSTER (cirpa 
de sters praf), doua screen-uri stin- 
ga, Jos pina ajungi la DOZZY care 
doarme bustean si numai un soc 
puternic il poate trezi. Deci... la 
treaba. Arunci CLOTH DUSTER pe 
LAMP, iei LAMP si DUSTER si 
mergi patru screen-uri stinga pina 
in sfirsit l-ai gasit pe DOZZY. Pune 
LIGHTING ROD pe capul lui si 
stind pe scari arunca CLOTH 
DUSTER pe LAMP. Un duh va iesi 
din lampa si va arunca trasnete + 
fulgere spre paratrasnet (mai tineti 
minte povestea cu amicul Aladin 
din multimea aia de nopti ?...). 
DOZZY se va trezi, iti va multumi si 
se va grabi sa iasa din scena. 
Mergi sase screen-uri dreapta, 
jos si unul stinga in fintina si ia 
STICKY THING, stinga un screen, 
sus si iar trei screen-uri stinga, 
arunca STICKY THING pe EX- 
CALIBUR (celebra sabie a lui Ar- 
thur) si ia-o. Atentie: o data luata, 
sabia nu mai poate fi lasata jos 
oricit ati vrea. Acum esti rege 
pentru ca numai un rege poate 
ridica sabia. Mergi cinci screen-uri 
stinga, doua jos, sari spre stinga, 
jos si iar stinga prin oglinda fer- 
mecata (ceva din Alice in Wonder- 


la faptul ca aici dreapta e stinga si 
invers). 

Cam greu dar scapam noi si de 
asta. Ai ajuns la GRAND DIZZY pe 
care il salvezi vorbindu-i. Mergi 
doua screen-uri dreapta, jos si 
unul dreapta si apoi dreapta “cit 
cuprinde" pina la VOLCANO, sari 
pe norii gazosi care ies in lava si 
treci pe partea cealalta. Jos doua 
screen-uri, vorbeste-i lui LUCIFER 
ia TRIDENTUL. Du-te in turnul lu: 
ZAK (mai gasiti-l si voi, ca doar nu 
va spun chiar tot) si foloseste 
tridentul pentru a-l rapune. Atentie 
ca si asta are prostul obicei sa 
arunce cu fulgere. la inelul (RING) 
care este tot ce mai ramine din 
ditamai namila de vrajitor si in- 
toarce-te din nou la LUCIFER care 
iti va spune cum sa distrugi inelul. 
Mergi stinga un screen pina pe 
piatra din mijloc si lasa inelul sa 
cada (e un stuff casant deci). Apoi 
da-i cele 30 de diamante (pe care 
cred ca nu ai uitat sa le stringi pe 
drum luindu-te cu una, cu alta) lui 
LUCIFER pentru a termina quest- 
ul. (... 27 de diamante sint vizibile 
dar 3 sint ascunse dupa garduri - 
PIECE OF RAILING). 

Screen-urile unde sint ascunse 
sint: THE SWORD IN THE STONE, 
BUSHY GROVE si CRACKS OF 
GEHENNA. 

Va las acum sa va descurcati cum 





da MAGIC PIPES. la-le, mergi jos si | land) si te vei trezi intr-o sala | veti putea... GOODLUCK! 
apoi sase screen-uri dreapta si | ciudata 
lasa MAGIC PIPES linga fintina. unde 
Mergi apoi un screen dreapta, ia | se afla 
LEAF pe care ai taiat-o mai inainte | pe jos 
si mergi apoi alte patru screen-uri | o tabla = 
la dreapta. Da-i bunei vrajitoare | de sah. 
Glenda POISONED APPLE, || a 
TORCH si LEAF care iti va prepara | regina 
WEEDKILLER. la licoarea si mergi | (acum 
patru screen-uri stinga. Arunca |poti, 
WEEDKILLER pe bietul DYLAN pe [doar 
care in acest moment l-ai salvat. e sti 
Mergi un screen stinga si ia |rege), 
MAGIC PIPES. Coboara in fintina | mergi 
pe iesitura din stinga (cea cu|u n 
diamantul) si lasa MAGIC PIPES | screen i: 
jos. O muzica de leagan va incepe, | stinga E 
sobolanul de vis-a-vis va adormi si | (atentie ă 
va cade in apa, eliberină drumul,  |ia cei Ș 
Mergi stinga doua screen-uri, ia |d o i kN 
LAMP si iesi prin pasajul secret | pioni si 
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by Emil Matara 


720 DEGREES. 
POKE 419180 


1942- POKE 47007,255 (vieti in- 
finite) 


AVF WIEDER- 
SHEN MONIY - 
POKE 43502201 (inamici imobili) / 
POKE 411390 (vieti infinite) / 
POKE 42160,201 (imvulnerabilitate) 


BARBARIAN  I 

1 REM * INFINITE LIVES FOR 

BARBARIAN * 

4 BORDER 0: POKE 23658,8 

5 CLEAR 65479 

6LETT=0:LETW=0 

10 FOR F = 65480 TO 65523 

15 READ A: POKE FA 

20 LET T = T+W*A: 
LET W =W+1 

25 NEXT F 

30 IF T 115996 THEN PRINT 

"ERROR IN DATA” : STOP 

32 INPUT "INVINCIBLE (Y/N)”; 
A$ 

33 IF AŞ = "Y” THEN 
POKE 65513,50 

34 INPUT "NEED TO 

RILL SINGLE MAN 

CYN)"; AS 

36 IF A$ = "Y" THEN 
POKE 6551850 

40 PRINT AT 10,5;'HERE WE GO” 

45 RANDOMIZE USR 65480 

50 DATA 6,2,197,17,17,0,55 

55 DATA 62,255,205,86,5,193 

60 DATA 16,243,221,33,0,64 

65 DATA 17,230,191,62,255,55 

70 DATA 49,254,255,205,86,5 

75 DATA 62,68,58,179,153,62,1 

80 DATA $8,253,142,195,168,137 


v 





BARBARIAN 2 

10 REM * INFINITE LIVES FOR 

BARBARIAN 2 * 

20 PAPER 0 : INK 7: BORDER 0: 

CLEAR 30207 

30 POKE 236588 : RESTORE: 
FOR 1 = 47000 TO 47015 

40 READ B: LET A = B-10: 
POKEIA: NEXTI: 
POKE 47003,0- 

50 POKE 470060 : POKE 47009,0 : 
POKE 47012,0 

60 INK 0: POKE 23624,0 : CLEAR 
: LOAD ”* CODE 47104 

70 POKE 47231,152 : 
POKE 47232,183 : 

RANDOMIZE USR 47104 

80 DATA 185, 60, 215, 166, 60, 171, 
160, 60, 37, 161 

90 DATA 60, 148,173,205,10,106 


BASIL 

1 REM * INFINITE ENERGY 

FOR BASIL THE GREAT 

MOUSE DETECTIVE * 

10 PAPER 0: INK 0: BORDER 0 

20 CLEAR 27000 

30 LET SUM = 0: RESTORE 100 

40 FOR 1 = 23296 TO 23316: 
READ A 

50 LET SUM = SUM+A.: 
POKE 1, A: NEXTI 

60 IF SUM 2375 THEN PRINT 
“ERROR IN DATA” : STOP 

70 POKE 236588 : POKE 233080 

80 PRINT "PUT ON BASIL» : 
LOAD *" CODE 55808 

90 PRINT USR 2329 

100 DATA 62, 201, 50, 29, 218, 205, 
0, 218, 62, 201 

110 DATA 50, 240, 163, 62, 0, 50, 80, 
161, 195, 0, 128 


POKE 33329, n (schimbarea culorii 


| ecranului) / 


nfs a veacusă 


POKE 37850,195 (inamici invizibili) 
POKE 24130,0 (energie infinita) 


BUGGY BOY. 
POKE 390860 (timp nelimitat) 


DEFLECTOR 

POKE 34256,195 (contact automatic 
POKE  34473,0 (vieti infinite) / 
POKE 42577,0 (energie infinita) / 
POKE 42735,0 (blocare supraincar- 
care) 


DEATH WISĂ 3 

POKE 38678183 (munitie infinita) / 
POKE 39353,183 : POKE 43301,183 
(energie infinita) 


ENDURO  RACER 
POKE 435420 : 
POKE 43643,0 (timp infinit) 


GAME OVER II 
POKE 542160 : 
POKE 57606,0 (vieti infinite) 


GHOSTS'N'GOBLINS 
POKE 360570: 

POKE 360580 : 

POKE 360590: 

POKE 36060,0 (vieti infinite) 


GAUNIZILET 

POKE 48488201 (vieti infinite) 

POKE 48491,0 : 

POKE, 48497,0 (energie infinita) 
POKE 436320 : 

POKE 43633,0 : 

POKE 436340 ('POTIONS" 
finite) 

POKE 44050,0 : 

POKE 440510: 

POKE 44052,0 (chei infinite) 


in- 
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GREAT ESCAPE 
POKE 41182,0 (moral infinit) 
POKE 50209,201 (fara inamici) 
POKE 45619,0 (porti fara chei) 


HAGLE'5 NEST 

10 REM * ALL INFINITE FOR 

"INTO THE EAGLE'S NEST * 

30 FOR A = 58833 TO 58845: 
READ B 

40 POKE A,B : NEXT A 

50 FOR A = 58403 TO 59000 

60 READ B : IF B = 421 THEN 
GO TO 80 

70 NEXT A 

80 RANDOMIZE USR 58368 

90 DATA 250,67,233,226,193,45 

100 DATA 8,226,122,5,246,29,119 

110 DATA 55,36,148,55,64,153,55 

120 DATA 185, 165, 55, 15, 161, 200, 
5, 133, 421 





GHOSTS'N'GOBLINS 
POKE 1010, 76 

POKE 1011, 248 

POKE 1012, 252 

pentru a incarca prima parte, apoi 
POKE 816, 167 

POKE 817, 2 

POKE 2086, 248 

POKE 2087, 252 

SYS 2061 

pentru partea urmatoare; cind cur- 
sorul clipeste: 

POKE 816, 167 

POKE 817, 2 

POKE 2086, 248 

POKE 2087, 252 

SYS 2061 

pentru ultima parte 

Cind se termina de incarcat, se intro- 
duce: 

POKE 7086, 23 

computerul va crede ca zombi este 
un obiect de luat! 


YEAGE 


CODURILE DE ACCES IN JOC 








BasingB-52 Strataferireaa 

Type : Strategic Heavy 
Bomber 

Power Plant: Eight 13,7501b 

thrust Pratt and Withneyj57- 

p-43W turbojet 

Wingspan : 185,0 ft 

Lenght : 157,6 ît 

Height : 40,7 ft 

Weight : 480,000 Ibs 

Maximum speed : 665 mph 

Ceiling : 55,000 ft 

Range : 9000 miles 

Armament : Two 20 mm can- 

non in remotely controlled 

tail position, 

20SRAM missiles, bombs. 

MIG-21 MF Fishhed 

Type: Single-seat fighter 

Power plant One 11,240 lb 

thrust Tumansky single-shaft 

turbojet 

Wingspan: 23,5 ft 

Lenght : 48,0 ft 

Height : 14,8 ft 

Weight : 11,464 Ibs 

Maximum speed : 1285 mph 

Climb : 36,090 ft/min 

Ceiling: 59,050 ft 

Range : 683 miles 

Armament: Two 30 mm NR- 

30 cannon, four AA-2 Atoll 

missilesAA-2 Atoll3: 

Guidance : Infrared or semi- 

activ radar homing 

Propulsion : Solid propeliant 

rocket 

Warhead : unknow 

Lenght : 9,1 ft 

Weight : 155 Ibs 

:471 in 

Wingspan 


Diameter 
:1,7& 


Maximum speed : 2 + Mach 
Range :4 + miles 

MIG=17F Fresce 

Type : Single seat fighter-in- 
terceptor 

Power plant One 5,952 lb 
thrust Kilmov VK-1 single 
shaft centrifugal turbojet 
Wingpan : 31,01: 

Lenght : 36,3 ft 

Height : 11,9 ft 

Weight : 9,040 Ibs 

Maximum speed: 7li mph 
Climb : 12,795 tt/min 
Ceiling : 54,460 it 

Range : 870 miles 

Armamen : Three NS-23 can- 
nons under nose, up to eight 
rocketsMeDonnell Douglas 
R-4E Phantom |l3 

Type : Two-seat fighter 
Power plant: Two 17,900 lbs 
Ib thrust General Electric J- 
79-GE-17A turbojets 
Wingspan : 38,4 ft 

Lenght : 62; ft 

Height: 16,5 ft 

Weight : 28,000 Ibs 
Maximum speed : 1,286 mph 
Climb : 61,400 ft/min 
Ceiling : 71,000 ft 

Range : 736 miles 
Armament : One 20 mm 
MGIA1 rotary cannon, four 
AIM. 7 Sparrows, four AIM-9 
sidewinders AIM-? Sparrew : 
Guidance ; Semi-activ radar 
homingPropulsion:Solid 
propellant rocket 

Warhead : 88 Ibarthelet con- 
tinuous rod 


Lenght  :12tt 


Weight : 503 Ibs 

Diameter : 8in 

Wingspan : 33 ft 

Maximum speed: 3,5 Mach 
Range : 30 + miles 

E:150D Thanderchiei 

Type : Single-seat fighter- 
bomber 

Power plant : Ome 17,200 lb 
thrust Pratt & Whitney J-75- 
19 turbojet 

Wingspan : 34,9 ft 

Lenght : 67,0ît 

Height : 19,8 ft 

Weight : 27,500 Ibe 
Maximum speed : 1,226 mph 
Climb : 34,500 ft/min 
Ceiling : 48,500 tt 

Range: 300 miles 
Armament: One 200 mm can- 
non, two 3,000 Ib bombs, and 
four siderwinder missiles 
Botinz B-29 Superfortres=3 
Type : High altitude bomber 
Power plant : Four 2,200 hp 
Wright R-3350-23 Duplex 
Cyelon 18-cylinder radials 
each with two exhaust-driven 
turbochargers 

Wingspan: 141.3 ft 

Lenght : 990 ft 

Height : 278 ft 

Weigb : 145,000 îhs (loaded) 
Maximum speed : 357 mph 
Ceiling : 36,00 ft 

Range: 3,250 mila 
Armument : One 20 mm can- 
non, one 0.50 mm machine- 
gun, 22,000 Ibs of bombs 
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Taste, control si functii 
Brougbht to you by OWNERSOFT 


La cererea 'majoritatii', publicam 
comenzile din ELITE pe Spectrum. Este 
incredibil ce se poate face doar in 
48(64)K. 


CS + 1 - Abandoneaza jocul curent (QUIT) 

1 - Lanseaza nava in spatiu. spre planeta 

> - Permite cumpararea de marfuri in baze (in spatiu 
comuta “vedere spate”) 

3 - Permite vinzarea marturilor transportate (in spatiu 
comuta "vedere stinga") 

4 - Permite cumpararea de echipament pentru nava 

(combustibil, rachete, aparare antiracheta, cargou 

suplimentar, bomba de energie, naveta de salvare, sistem 

pentru culegerea marfurilor din spatiu "FUEL 

SCOOPS"), in spatiu : “vedere dreapta” 

1 - Harta galaxiei in care te afli 

O - Harta stelelor din raza de actiune (cursorul se misca 








computere': 
Spectrum (cu piese din stoc) 


S-A STRICAT CALCULATORUL? 
EZITATI! 


VI 
NU 






Important 


Specialist in electronica, asigura service pentru toate tipurile de 'home- 


Commodore (in limita pieselor diponibile) 


_SUNATI_ LA 10.63.74 


pe bartacuM/N S/X D) 

P - Afiseaza date despre steaua fixata pe cursor 

R - Cauta steaua dorita dupa introducerea numelui ei 

K - Afiseaza lista de preturi a stelei pe care esti 

L - Afiseaza datele curente ale navei si comandantului 

ENTER - Afiseaza incarcatura de marfuri 

M - rotire la dreapta 

N - rotire la stinga 

SPACE - Acceleratie 

SS - Frina (in baza activeaza LOAD & SAVE) 

A - Foc laser 

- Armeaza racheta 

- Lanseaza racheta la tinta (doar daca 

exista obiectiv) 

- Anuleaza armarea rachetei 

Q - Lanseaza nava de salvare daca o ai cu 

ine. E bine sa o folosesti doar in caz de 

ENERGY LOW” pentru ca este foarte 

scumpa. 

- Lanseaza bomba de energie care dis- 

truge toate navele din zona radarului 

] - Mareste viteza daca in apropiere nu sint nave 

H - Activeaza sistemul hiperspatiu. Impreuna cu "G" 

realizeaza "transplant" in urmatoarea galaxie, daca ai 

"GALAXY HYPERSPACE'. 

C - Realizeaza docarea automata daca ai COMPUTER 
DOCKING la bord 















- Daca atacati statia de docare nu veti mai fi primit. 

- De navele care va ataca nu scapati prin fuga ci dis- 
trugindu-le. 

- Comertul cu narcotice, sclavi sau arme va aduce sub in- 
cidenta legii. 

- Daca atacati nave care nu trag, puteti fi acuzat de 
piraterie si atacat de politie si de vinatorii de recom- 
pense. 

- Gradul vi-l ridicati doar prin lupta ! 

- Numarul de credite il sporiti prin lupta sau comert. 
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RUTINA DE 
TIPARIRE PE 
ECRAN 


by TERRORSOFT (member of 
CR.C.) 
DANIEL ROMAN 
Bucuresti 


Este o rutina de PRINT in cod 

masina care va folosi mult cracker- 
ilor pentru afisarea pe ecran a 
anumitor texte fara folosirea instruc- 
tiunii BASIC, PRINT. Este, veti 
vedea, foarte usor si comod de 
folosit. Se pot modifica locatiile: 
- LOCTIP - locul pe ecran unde se va 
tipari textul in lipsa precizarii lui de 
catre utilizator - are valoarea 44000. 
- ADRCHR - adresa de unde sint 
numerotate codurile caracterelor (in 
ROM este 15616). 

Rutina de tiparire pe ecran 
recunoaste caracterul de control 13 
(%D) care inseamna trecerea la o 
noua linie si chr. 22 (%16) care 
lucreaza obisnuit, ca in BASIC: este 
urmat de 2 cifre care semnifica coor- 
donatele unde va fi afisat textul. 


10 ORG 60000 


20  LDDE,(LOCTIP) 
30  ROUT LDA,(HL) 
40 CP 416 

50  URNZ,ENTER 

80  INCHL 

70  LDA,(HL) 

80  CP8 


9U JR NC,INCE2 
100  LDD,440 
110  JRGO 


120  INCE2CP 16 
130  JRNC,INCE3 
140  LDD,%48 
150  SUBS8 

160  JRGO 


170  INCE3LD D,450 


200 CCF 
210 RLA 
220  RLA 
230  RLA 
240  RLA 
250  RLA 


ADD A,(HL) 

LD E,A 

INC HL 
ENTER CP 4D 
JP NZ,PRINT 
LD A,E 

CP 4EO 

JR C,TRY2 

LD E.,0 

LD A,D 

ADD A,8 

CP 450 

JR C,GOOD 
LD A,450 

LD E,%EO 
GOOD LDD,A 
INC HL 

JR PRINT 

TRY2 LDAE 
LD E,420 

AGAIN CP 420 


OK INCHL 
PRINT PUSH DE 
PUSH BC 


LD BC,(ADRCHR) 


LD A,(HL) 


DIG1 SCF 
CCF 

RLA 

JR NC,DIG2 
INC B 

DIG2 ADD AC 
LD C,A 

LD A,8 

TIP EXAFAF 
LD A,(BC) 

LD (DE),A 

INC BC 














780  INCD 
790  EXAFAF' 
800  DECA 
810  JRNZTIP 
820  POPBC 
830  POPDE 
840  INCHL 
850  LDAE 
860  CP255 
870  JRNZINCDER 
880  LDA.D 
890  ADDA, 
900  LDE,O 
910  CP451 


920 JRC.INSCR 

930  LDA,450 

940  LDE,%EO 

950  INSCRLDD,A 
960  JRDELBCR 

970 INCDER INC DE 
980 DELBCR DEL BC 


990  LDA,B 

1000  ORC 

1010  JPNZ.ROUT 

1020 RET 

1030  LOCTIP DEFW 44000 


ADRCHR DEFW 15616 


Rutina se apeleaza in mod obis- 
nuit: 
LD HL, adr.text 
LD BC, lungime text 
CALL... 

Textul este format din codurile 
ASCII ale chr. ce-l compun. Cind 
programul intilneste codul 13 (4D) 
trece la o linie noua. Caracterul 22 
(AT) trebuie urmat de 2 nr. - primul 
cuprins intre 0 - 23 (linia) si al doilea 
intre 0 - 31 (coloana). 
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(c) Mike - SOFT from 
TRINAR SOFTWARE 


In biblioteca de rutine 
grafice cu care este dotat 
BASIC-ul de SPECTRUM 


se remarca lipsa unei 
rutine de GRAPHIC 
FILL 


Rutina de fata (scrisa in 
limbaj de asamblare) este 
conceputa special pentru a 
face fata acestei probleme, 
integrindu-se perfect in 
ambianta interpretorului 
BASIC. 

Protocolul de utilizare 
este mai mult decit banal: 
PLOT xy: 

RANDOMIZE USR ADR 
unde x si y sint coor- 
donatele unui punct din 


interiorul figurii care 
trebuie umpluta (si 
colorata in atributele 


curente) iar ADR este 
adresa unde a fost 
asamblata rutina. 

Daca s-au gresit coor- 
donatele... nici o 
problema... programul va 
semnala cuminte eroarea. 

Majoritatea rutinelor de 
acest gen gresesc la figuri 
complicate, uitind unele 
zone. Acest algoritm nu 
poate gresi deoarece isi 
face anumite notite (dupa 
STK) si de aceea este 
recomandabil a nu se 
folosi zona de memorie 
imediat dupa program sau 
de a se muta STK intr-o 
zona nefolosita - de ex- 
emplu in buffer-ul de im- 
primanta (23296). 

Oricum trebuie sa fii 
prea sadic si sa-i dai o 
figura prea complicata (cu 
peste 100 de insule) pentru 
ca programul sa-si noteze 
mai mult de 256 octeti 
dar... 

Pentru utilizare normala 
se recomanda pentru ADR 
valori de tipul 50000, 
60000, in orice caz dupa 
RAMTOP 


(adica este de preferat ca 


SI LDHL,BUF+1 


programul sa fie situat in LD BC,(23677) 
afara zonei de lucru LD A,174 
BASIC deci dupa un SUB B 
CLEAR n - 23900 JR CERR 
n = ADR-1). LD A,B 
Dupa ce asamblarea a OR A 
fost facuta propun ur- JR ZERR 
matorul test: LD AC 
OR A 
JR ZERR 
EEE! 
10 LET s=0:FORI= INC A 
50000 TO 50284 : JR NZOK 
LET s=s + PEEKI: ERR EI 
NEXT |: !F 828875 THEN RST 8 
PRINT "EROARE!" : DEFB 4 
STOP Ok DECCINCB 
20 CIRCLE 100,100,40 : CALL POI 
CIRCLE 100,110,10 : INCB 
PLOT 100,138: CALL POI 
RANDOMIZE USR 50000: INC C:INCB 
PLOT 200,10 : CALL POI 
RANDOMIZE USR 50000 INC C 
CALL POI 
Atentie ! Rutina de test INC C:DEC B 
este valabila doar pentru CALL POI 
ADR = 50000, SIK DEC B 
pozitionat dupa program, CALL POI 
BUF gol, imediat dupa DEC B:DEC C 
asamblare. Oricum este CALL POI 
dificil de lucrat asa DEC C 
deoarece G_FILL nu este CALL POI 
relocabil si va sfatuiesc in LD IX,BUF 
caz de nereusita sa treceti LD A,(1X+8) 
si la linia 20. LD (X+0),A 
LD A.(1X+1) 
ORG 50000 LD (X+9,A 
DI LD A,(1X+2) 
LD HL,STK LD (X+10),A 
PUSH HL LD HL,0 


LD DE,0 
LD BC, 1024 


CALLC INC IX:INC IX 


LD A,(X+0) 
ORA 

JR NZ.NW 
INCH 
LDL,B 

LD A,(X-1) 
AND ([X+1) 
LDCA 


LD A,(1X-2) 
AND(X+ 1) 

OR CLLDCA 

LD A,(X-1) 

AND (1X+2) 
ORC 

JR ZNW 

INCD 

LDE,L 

NW DINZCALC 
LD A,H:OR A 

JR NZVW 

LD HLSTK 

POP BC 
SBCHL,BC 

LD A,H:OR L 

JR NZ,OUTS 


PUSH BC 
JP SI 
VW DECA 





















26 bobBIT 
IR ZPLT LD CA LD(HL),A AND 1 
LD A D'OR A INC HL LD AH POP HL 
JR ZPLT LD B,(HL) RRCA LD(HL)A 
POPHL LD A,(23678) RRCA INCHL 
LD BC,(23677) ADD AB RRCA LD BC,(23677) 
LD (HL)C LDBA AND3 RET 
INCHL LD(23677),BC OR 88 BUF DEFS 15 
LD (HL),B CALL 8874 LDH,A DAT DEFB 255 
INCHL LD BA LD A,(23693) DEFB 0 
PUSH HL INCB LD (HL)A DEFB 0 
LD LE LD A,254 JP SI DEFB 255 
PLT LDB,L PLC RRCA POI PUSHHL DEFB 1 
LD HL,DAT-2 DINZ PLC CALL 8874 DEFB 0 
CPW INCHL:INCHL LD B,A LD B,A DEFB 0 
DINZ CPW LD A,(HL) INCB DEFB 1 
LD C,(HL) AND B LD A,(HL) STK DEFBO 
LD A,(23677) XOR B POC RLCA 
ADD AC CPL DINZ POC 
PPP 7 07 APE POET C- Drop chelt cartridge Shin-D- Activate previoue 
II AIE PO F-Drop fiare mode on îhe fird MFD 
pacea Sum- | R- Toggle radar jammers | to the right (LHOConiy) 
on and ot CYi-D- Enter Coniig mode 
a A PNR L Attack | + Toggie infrared jemmere | on the third MFD to 
EVEPLANT / level 3 - WEATWALL /|| CPOPPE7 adica dei defnairad 
level 4 - GOODNITE / lee! $ -| ieneCentrela Forza agora tăltoeipa zi eoliara 










SKULLDUG / level 6 - BIGMOUTEH / 
level 7 - CREEPISH / level 8 - 
FINALFXS 







SAVAGE 2&3 
SABATTA / FERGUS (SABATIA / 
PORSCHE) 




















| 


|SKATING USA. 
THIS BOY CAN WAIT (level 4) 






AFEW PORES... 
BIONIC COMMANDO - 34274,0 
SOLDIER ef FORTUNE - 44103,250 : | 
RANDOMIZE USR 26359 
PHANTOMAS - 44819,0 : 46790,191 
NONAMED - 33715,0 : 36885,0 
EQUINOX - 49566,0 : 26174,0 
PROFANATION - 47693,0 : 47672,201 


SPIKY HAROLD - 34813,0 : 37043,175 
: 36121,201 


TROOPER - 309240 : 


6 - 10% Madmum Thruet 


Ceckpit Contrelks 
Targting and  Counter- 
measure Controle [| or ] 
- Select Weapon 
Spacebar or Button O 

- Fire Selected Weapon 
Enter, or Button 

1 - Select next target to 
the right ot current target 
' = Select target closest to 
aiming crosshair 


increase  FWR meg- 
nifoation 


Multi-Funetien Dis- 
play Centreis 

A- Activate next mode on 
lett-most MFD 


the third MFD to the right 
(UK only) 


V-Toggie Helicop- 
ter/Airplene mode on 
Operey 

X- Drop suppilee 

Z- Piok up euppilee 


Game Controls 
Ctt+P- Pause the game. 
Preee any key to resume. 
Cti-Q- Abort mission 
Baokspace- Toggle cook- 
pit on and oft 
T- Toggle time compree- 
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by TERRORSOFT (mem- 
ber of C.R.C.) 


Nu, nu e o rutina obis- 
nuita... Multi dintre dvs. 
ati vazut cum unele 
programe afiseaza in tim- 
pul incarcarii un contor. 
Asta face si rutina aceasta. 
Pot fi modificate citeva 
locatii daca este necesar: 

- 1580 REV DEFW 453F 
- adresa de intoarcere din 
subrutina; 

- ADRCHR - adresa (in 
ROM) de la care incep 
codurile chr. 0 - 9. Puteti 
introduce alt set de chr. in 
RAM 


Atentie ! Inaltimea chr. 
trebuie sa fie de maximum 
6 pixeli (care compun 
ui: 

CHRZ, PCHRU 
reprezinta locatiile in zona 
video unde este scris con- 
torul (cifra zecilor, respec- 
tiv unitatilor, nr. de K). 
Normal, trebuie sa fie 
locatii consecutive; 

- locatia BORDER - e 
folosita pentru a obtine pe 
margine toate cele 8 
culori. Nu are importanta 
modificarea ei. 
ATENTIE ! Tasta BREAK 
este dezactivata. Pentru a 
o activa inlocuiti liniile 
410 NOP si 139) NOP cu 
RET NC. 


10 ORG 65000 
20 ROUT INCD 


30 O EXAFAF' 
40  DECD 
50 DI 


70 LDHL,(REV) 
30  PUSHHL 
90 INA(%FE) 


100  RRA 
110 AND 420 

120  OR2 

130  LDCA 

140 CPA 

150  ERRORRETNZ 
160 BEGIN CALL CODE2 
170 IRNCERROR 

180  LDHLF415 

190 WAIT DINZ WAIT 
200  DECHL 

210  LDAL 

220  ORH 

230 IR NZ.WAIT 

240  CALLCODEI 

250  IRNCERROR 

260  LEADERLDB,49C 




























CALL CODE1 
JR NCERROR 


JR NC,BEGIN 
INCH 

JR NZLEADER 
SYNCR LD B,4C9 
CALL CODE2 

JR NCERROR 
LD AB 

CP 4D4 

JR NCSYNCR 
CALL CODE2 
NOP 

LD AC 

XOR 3 

LD CA 

LD HO 

LD B,480 

JR LOADC 
OTHERC EX AF,AF' 

JR NZ,VERIFM 
LD (IX +0)L 

JR NEWCOD 
VERIFM RL C 
XORL 

RETNZ 

LD AC 

RRA 

LD CA 

INC DE 

JR FIRSTC 
NEWCOD INC IX 
FIRSTC DEC DE 
EX AFAF' 

PUSH DE 

PUSH HL 

SRLD 

SRLD 

LD AD 

LD B,4F6 

LD E,4FF 
ZECIK ADD A,B 
INCE 

JR CZECIK 
SUBB 

PUSH AF 

RLCE 

RLCE 

RLCE 

INCE 

LD D,0 

LD HL,(ADRCHR) 


Sssăsăcease 


Ss ses 


ADD HLDE 
LD DE,(PCHRZ) 
LD B,6 
PRINTZ LD A4(HL) 
LD (DE),A 
INCD 
INCHL 
DINZ PRINTZ 
POP DE 
LD E,D 
RLCE 
RLCE 
RLCE 
INCE 
LD DO 
LD HL,(ADRCHR) 
ADD HL,DE 
LD DE,(PCHRU) 
LD B,6 
PRINTN LD A,„(HL) 
LD (DEJA 
INC D 
INC HL 
DINZ PRINTN 
POP HL 
POP DE 
LD B4BF 
LOADC LD LA 
BITSC CALL CODE1 
RET NC 
LD ACB 
CPB 
RLL 
LD B4B0 
JP NCBITSC 
LD AH 
XOR L 
LDH,A 
LD AD 
ORE 
JP NZ,OTHERC 
LD AH 
CP1 
RET 
CODE1 CALL 
CODE2 
RET NC 
CODE2 LD 
A,k16 
PAS DECA 
JR NZ,PAS 
AND A 
BINCINCB 
RET Z 





LD AFTE 
IN A(&FE) 
RRA 


POP HL 


REV DEFW 453F 
ADRCHR DEFW 43D80 
PCHRZ DEFW 45180 
PCHRU DEFW 4SIE1 
BORDER DEFW 0 


Aceasta rutina se apeleaza ca 
orice rutina de incarcare: 

LD IX, adr. start 

LD DE, lungime 

LD A, markbyte 

SCF 


CALL ROUT 
Indicatorul Carry (C) va fi pus pe 


0 daca s-a semnalat eroare la in- 
carcare, altfel va fi pus pe 1. 
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ETRU 
ELECTRONIC LISTA DE PIESE 


Cu acest Vumetru electronic se poate | R1=700Q - 4buc. 
controla vizual nivelul semnalului ce intra | R2=2,2KQ - 3buc 
in calculator. R3=30K2 — 1buc 

Montajul daca este corect realizat | R4=1KQ- lbuc 
functioneaza de la prima incercare; daca | R5=220Q - buc 
se realizeaza si montajul din hobBIT | R6=400Q - buc 
nr.3(1991)-"Refacere semnal Spectrum”, | T1=BC 170. ..172 
se pot puneambele montaje in aceeasi car- | T2=BC 250, . .252 
casa. D1-D4=led - 4buc 


UADAUUD 


DEVA 


IONEL NEAG 





| SIM CITY 


Fie soft-ul cit 


Ar trebui o lege prin care fiecare 
zidi de rau 


joc sa fie dotat cu un 
Trips& Tricks. Sau macar atunci 
cind il cumperi, sa-ti dea si cum 


Tot mai bun e 
CIP-ul meu ! 


poti avea vieti infinite. 
| La 'Sim City daca pui 'NumLock' 
| pe on si tastezi "FUND". mai ai 
10.000$. 
Esti mai fericit acum? 


Strigatura de joc 
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Trimiteti-mi o caseta cu pro- 
grame pentru Spectrum si o veti 
primi inapoi inregistrata cu alte 
programe. 

Ovidiu Negus/Str.Independentei 
31/Simleu-Silvanei/Salaj 

Cumpar HACKER 1-5, 
POKEMANIA, Terminator 1+ 1], 
Sir Fred, Kracout'89 si utilitare; 
joystick. 

tel:755308 


Cumpar cite un exemplar din 


revista 'hobBIT”, numerele 1, 2, 3, 
4,5, 

tel:986/11008 - Petrica d. 14.00 
Vind (schimb)jocuri Spectrum. 
tel:836748-Radu d.21 

Vind jocuri Spectrum sau fac 
schimb. Vind un calculator Sinclai 
ZX81 cu tastatura digitala si 
documentatie in engleza, franceza 
si germana. Cumpar unitate floppy 
cu interfata pentru Spectrum. 
Edward  Burceag/Str. Marasesti 
44/BL.T1/ap.19/Suceava 


Vind calculator HC-85 in perfec- 


ta stare 19000 lei. Cumpar pro 
grame de baze de date pentru 
HC-85 

tel:768715 

Vind drive-1541 si cumpar discuri 
sau casete cu programe sau jocuri 
89-91 pentru Commodore. 
tel:934/15328 

Cumpar joystick pentru Spectrum 
cu 2000lei. 

tel:921/67333 

Schimb sau vind programe pentru 
calculatoare Spectrum. 
tel:933/22583 


> aR>ARa 


Baiat prezentabil, 16 ani, cu 
domiciliu stabil in Cimpina. Caut 
colaborator pratru schimb de 
programe si jocuri. Caut in spe- 
cial Turtles Ninja II. 

Claudius Toma.Str.1 Mai 14/ 
Cimpina 

Cumpar soft pentru calculator 
TI99/4A. 

tel:362661 d.18.30 

Caut programe utilitare si jocuri 
pentru C128 sau C64 (pe disc) 
tel.671052 d.18-20 
Schimb programe 
Spectrum. 

Adrian Mihaila /com.Bisoca 

Vind jocurile cele mai noi pentru 
Spectrum. Ofer harti, documen- 
tatii. POKE. Trimit lista cu toate 
jocurile pe o caseta. tel:95/168733 
Vind/Cumpar programe pentru 
CPC464, 664, 6128. Caut im- 
primanta pentru HC 

tel:163658 - Andy 

Cumpar casetofon Electronica 
302. Schimb programe Spectrum 
929/4851 - Mihai 

Cumpar imprimanta cu interfata 
pentru ZX spectrum cu hirtie 
obisnuita 
AHERON& Satan 
Software va ofera 
programe de ultima ora pe 
Spectrum, Commodore, Atari si 
PC; documenattii. 

tel:961/138370 

Vind C128, drive 1541, monitor 
joystick, programe, 
documenattie. 

tel:275304 


pentru 


Knight 
jocuri si 


verde, 


tel:989/61727 d.16.00 

Caut jocuri pentru Junior XT sau 
compatibile. 

tel:978/23189 


Cumpar calculator HC-90 sau 


compatibil cu iesire monitor 
RGB-TIL Felix (mufa 4/5) 
tel: 768715 

ut in lucrarea “lotul... 
despre calculatorul personal 
aMIC. Ofer lucrarile: 
“Programare in limbajul Frotran, 
Programare in limbajul de 
asamblare LAF”. CUmpar copie 
dupa capitolul 10.10 si 13.29 din 
lucrarea: “Totul despre . . 
culatorul personal aMIC 
tel: 973/26352 
Cumpar jocuri si utilitare com- 


cal- 


patibile Spectrum cu plata ram- 
burs si cu o lista anticipat Fara 
bisnitari. 

Sandu/Str.Lu gojana 
10%B1.15D/ap.29/Buc. 

Vind sau schimb programe pe 
Spectrum si IBM 
tel:95/169867 

Schimb programe 
Commodore, PC. 
tel:921/17168 

Schimb programe C64. 
Catalin Climov 
Str.Luceafarul 
/ap.10/Suceava 
Cumpar folie pentru calculator 
ZX Spectrum 

tel:455183 - Horea 

Caut jocuri pentru Spectrum. 
Dau la schimb. 

tel:223823  d.18 

Doresosa corespondez. 

Dan Sisnic/ Str.Griusor /BL.G4 
/ap.8/ Fetesti 

Cumpar integrat 
stabilizator de turatie, Sanyo 
A4102 M2. 

tel:966/69844  d.15 

Ofer o caseta cu jocuri pentru nr. 
1-5/1991. Caaut amatori schimb 
programe Spectrum. 
Crisoft/Bd.Republicii 37/14/Baia 
Mare 


Spectrum, 


22/B1.22 


circuit 


jocuri si utilitare contra IBM 


29 
P Cumpar monitor color pentru | Schimb programe pentru 
C128 cu RGB+ Composite. Vind | C64/disc si caseta. Vind C64 cu 
O Casio 702P. casetofon (300DM) 
S tel:474773 te1:923/24329 
Schimb programe pentru | Schimb calculator COBRA color, 
TŢ Spectrum 48K. nefolosit, documentatie, casete cu 
PC/XT sau IBM PC/AT nefolosit 
A sau putin folosit. 
CP. 72-113/Bucuresti 
Vind JET=13000lei. Cumpar 


manual Spectrum sau documen- 
tatie BASIC, 
tel: 844542 - Alexandru 


Vind TI. 
tel:679293 
Caut posesor  AMSTRAD 
404/664/6128; schimb programe. 
tel: 792771 
Cumpar aparat MODEM si 


jocuri pentru Spectrum mai 
deosebite 

tel: 956/60519 

Cumpar jocuri pentru Spectrum 
(Shadow Warriors/Batman/ 
Toyota/ Dan Dare/  Elite/ 
Robocop). 

tel: 973/26352 

Cumpar(schimb) programe 
Spectrum > Caut jocurile aparute 
in topul din hobBIT 3/91 si 
1/92.Ofer 300 pentru numerele 1, 
2, 5 din1991. 

tel: 921/68544 

Cumpar programe utilitare si 
jocuri pentru HC-90. Rog preturi 
accesibile. 

Dr.Dingo/Stefan cel Mare 26/ 
BL2A4A/ap.8/Bucuresti 

Ofer preturi generoase. 

Adrian Mihaila/ sat Lopatareasa/ 
com. Bisoca/Buzau 


Cumapr sau schimb jocuri. Caut 


programele:Termiantor  1+Il, 
Robocop II, Niegel Mansel, Fist 
of Fury, Basket Maste, Ninja. 

tel: 397896 - Cristi 

Caut programe utilitare pentru 
Spectrum:Tasmerge, TZD, Spec- 


RSX, Life Guard,  Tutor 
(engleza) 
Caut jocurile pentru 


Spectrum:Robocop 48, Cryzor 
48. Ofer la schimb alte jocuri si 
utilitare, la alegere. 

Florin Tudor/Str.Radu cel Mare 
/BL16/ap.13/Tirgoviste 


hobBIT 





Vind interfete si motherboard 
PC-XT, componente PC-AT, 
HD, FD, tastatura (102 key). 
Cumpar placa de baza AT-286, 
386, 486 

tel: 807059 Razvan 


Cumpar/schimb jocuri si alte 


programe (noi) pentru IBM PC 


cartridge, 120 caractere grafice, 


sunet 3 canale cu 8 oc- 


tave + documenattie+jo-  curi: 
150$ sau 46.000 

Cumpar tastatura HC-85 “si 
numerele 1 si 2 din hobBiT; 
jocuri din "Top 20. Ofer gratuit 


documentatie joc "Captain 


tel: 101094  -Mircea 


Cumpar jocurile: Terminator 2, 


Ninja Remix, Toyota, Robozone 
(Spectrum). Pret maxim: 30-50 lei 
tel: 921/67333 

Vind carcasa+tastatura CIP-03 
pentru tastatura model 
Cobra(nou)+ 2000 lei sau tas- 


frecventa peste SMHz plata ram- | America” Spectrum 48/128K+2, | tatura Cobra+10 casete cu 
burssau anticipat. Amstrad CPC (engleza, franceza, | utilitare. 

tel:234776 Adi germana) tel: 786401 

Microcalcualtor  128K, inter- | tel: 91/665973  Ilhan Ofer.Robocop, Indiana Jones, 
pretor BASIC MICROSOFT in- | Caut/schimb documentatie | Batman, Turtles Ninja. Caut 
corporat, tastatura | pentru Atari 520ST 9floppy) si | Robozone, Teminatoril. 
electro-maagnetica, 73 taste, | QLSinclair(microcartridge). tel: 951/ 64935 


Schimb jocuri Spectrum si ofer 
harta completa a castelului din 
jocul "Into the Eagle's Nest. 
Ciprian  Codar/ Str.Zizi-nului 
71/B1.104/ap.39/ Brasov 

Caut numerele 1-5 din hobBiT; 
ofer nr, 3, 4 din InfoClub; 
schimb utilitare si 
Spectrum. 

tel: 976/23760 

Cumpar imprimanta compatibila 
CIP. 

Mihai Toma/ Str.Vilcele 62/ 
Bucuresti 


jocuri 





Hi friends, 

Se pare ca cu atita posta, spatiul 
meu s-a restrins. Incerc sa ma des- 
curc si asa, desi am la o groaza de 
scrisori de raspuns. Deci a aparut si 
Al-Manahul  hobBIT. Bine, el 
trebuia sa apara in februarie, asa 
cum am stabilit, dar din cauze 
'exterioare! a aparut in martie. Dar 
in martie, e martie. . . si apare revis- 
ta! 

Asa ca luam Almanahul si mai dam 
niste bani si pe revista. Cine mai 
vrea... 

Bun, sa nu lungim scrisul si sa va 
spun ce am pe suflet: 

In primul rind, va roooooooog, 
tineti minte ca un talon odata trimis 
asigura abonamentul pe un an; nu 
mai trimiteti cu zecile la fiecare 
numar, ca ne va exploda calculatorul 
In al doilea rind, la anunturi, mai 
scrieti si voi adresa, ca 'prima pe 
stinga” nu merge. 

Apoi, chestia cu:'cum se intro- 
duc,POKE-urile" . GATA scrie in al- 
manah. 


9 
A 











Am un teanc de 
scrisori cu  mate- 
riale de publicat, 
asa ca pe rind le 
vom face pe toate. 
Vreau scrisori non- 
d  conformiste, asa ca 
lasati 'Domnul Larry'. 
Si acum raspunsurile la scrisori (£.f.f. 
pe scurt): 
Adi Mihaila /Bisoca-joysticuri nu mai 
avem, iar daca-ti spun pretul la cele 
noi... . (valabil si pentru ceilalti) 
Titi Tutui / Bucuresti-cu mama o 


| rezolvi singur, defectul il rezolvi din 


hobBIT. 

Tudor Pascu | Buc.-NEWS-ul?Este 
cel mai simplu lucru de folosit. Pur 
si simplu butonezi tot ce apare pe 
ecran. Nu se strica nimic, 

Ioan Davidescu / lasi - Dear, Radu a 
spus ca NU!. 

Bogdan Fiterau | P.Neamt - Sa trimit 
jocuri. Cu toata placerea, dar cind sa 
o mai facem si p-asta? Poate mai tir- 
ziu ... 

Mihai Negoescu | Timisoara - Mihai, 
imi pare rau ca ai cutia postala 
goala, dar la voi este o filiala CRC. 
Dragos lonescu | Tecuci - Cam dura 
scrisoarea ta. hobBIT-ul nu mai este 


DA, doresc un (] abonament(e) la revista hobBIT 


COD 


SnSuBaa5OBRRUIBREaanaanaauuaanannaaeanunaananuasannuaennnaazannaaal 


Plata se face 
rimirii coletului. 
eridicarea reviste duce la pierderea 
abonamentului. 


pentru incepatori? Pai sa vezi tu una 
'din afara' cum arata. Trimite T&T, 
nu te mai lauda. 

Bogdan Stir / Buc. - Cind scrie 
CLEAR pe  Spectrum-ul sau 
apare“RAM TOP no good. 0:1'.Vrea 
sa stie ce are.(unu zero pentru S.) 
Emest Bohm / Vulcan - "Atunci" eu 
am scapat, asa ca n-am de ce sa nu-ti 
raspund: incearca si regleaza capul la 
casetofon. 


-Bun, am raspuns la mai multe 
scrisori decit ma asteptam. Multi 
imi spun ca revista ajunge cu intir- 
ziere la ei. Asta este Posta noastra 
cea draga, care vad ca isi sporeste 
taxele in fiecare luna. 

-Ne gindim serios la listele cu jocuri 
care se pot comanda; in curind, 
foarte curind. .. 

-Asa cum vedeti, in paginile hobBIT- 
ului se regasesc materiale in mare 
parte trimise de cititori, cum este si 
normal. Hai sa incercam sa publicam 
mai multe harti si Trips&Tricks-uri, 
asa ca puneti-va pe treaba. 

-A, era sa uit, cum este si normal, 
orice colaborare se plateste. 

Va astept. 

BYE 


Un singur TALON va asigura 
primirea regulata a fiecarui 
numar, timp de 1 an. 


in momentul 


MEGA LIST 





Materializer 


Program 1: Materializer 


CCBa:4C BC CC 4C 74 
CCG8:CD 4C 45 CD A9 98 28 
CC19:FF A9 Cg 85 FC 
CC18:FB A8 A2 98 91 FB 
CC20:FB E6 FC CA D8 F6 
CC28:D9 C9 15 FO 87 
CC39:03 AG 81 2C A2 28 
CC38:CD 8C AA 92 85 
CC49:;CD A9 98 A8 85 
CC48:A9 A0 85 FE A2 98 Bl 
CC58:91 FD C8 D8 F9 E6 
CCS58:FE CA DO F2 280 19 
CC68:C8 8D 88 92 A9 93 28 
CC68:FF A9 80 80 88 
CC?70:8D 18 DO 682 A2 
CC78:02 A2 08 BE A7 92 
CC88:85 FB 85 FD A9 
CC88:A9 AQ 85 FE A8 
Cc98:CD A7 92 AD 
CC98:11 Bl FB 3D 29 
CCAG:B1 FB 3D 31 CD 91 
CCA8:99 9D Bl FD 3D 29 
CCBOG:02 Bl FB 95 02 91 FB 
CCB8:FB 18 69 98 85 
CCCg:E6 A5 FD 18 69 
CCC8:FD 02 E6 FE 
CCDBG:A8 DO Cl A9 98 
CCD8:FD ca 85 FC 
CCEB:FE EO 98 99 
CCE8:AD 22 FO 9B 
CCFG:48 29 BA CD 68 
CCF8:C8 98 98 97 
CDOA:AE A7 02 EO 98 
CD88:7E AC A8 82 
CD19:D8 FD 88 D8 F8 62 
CD18:CD A5 01 99 87 85 831 
CD280:603 78 A5 91 29 
CD28:63 98 82 81 19 92 
CD30:04 BF F7 7F FE 
CD38:FB DO8 D8 15 17 
CD49: A9 AC 79 CC 
CD48:88 A9 93 28 D2 
CD58:97 02 DD AC 
CD58:3B 8D 18 D9 
CD698:D2 62 92 28 


Program 2: Materializer Demo 


40 IFPEEK(52225) <>12THENLOA 
D"ML-MAT",8,1 
POKE53289, 8: P0KE53281,8: 
POKE688, 3 
DIMVT$ (24) :vTŞ(0)=" 
(HOME) " : FORI=1T024:VTȘ(1 
)=VT$(1-1)+" (DOWN) " : NEXT 
78 PRINT" (BLK) (CLR) "CHRȘ(14 
) : SYs52224 
75 PRINTVT$(7) TAB (5) "(CYN) 


RAJnnneeneeenneeenteenae 
Li di Ss 


PRINTTAB (5) "-(28 SPACES) 


58 
62 


82 
90 PRINTTAB(5)"- (RED) 

(6 SPACES)MATERIALIZER 
(9 spAcEs)TCYNI= 


CD 
Al 
98 
8D 
93 
EO 
28 
D2 
EO 
14 
A4 
18 
Al 
389 
D2 
3D 
c4 
26 
DA 
F3 
91 
93 
7B 
43 
9D 
8A 
59 
Al 
A2 
A8 
3c 
FA 
99 
9B 
AC 
5D 
19 


..79 


48 
61 
Fr4 
80 
c6 
97 
71 


199 


119 


129 


138 


149 


162 
178 


189 


198 
222 


218 
229 
238 
259 
269 
279 


288 


299 


309 
319 


320 
339 
348 
359 
369 


378 


388 


398 
492 


418 


PRINTTAB (5) "-(YEL) 

(6 SPACES)COPYRIGHT 198 
8(8 SPACESȚ(CYN)-" 
PRINTTAB (5) "-(YEL) COMP 
UTE! PUBLICATIONS,INC- 
SPACE) (CYN)=" 
PRINTTAB (5) "=(YEL) 

(4 SPACES)ALL RIGHTS RE 
SERVED(5 SPACES) (CYN)=" 
PRINTTAB (5) "- 

(28 sPACES)-" 

PRINTTAB (5) TEZIrterreke 
mennrrehekeaee FITI EXI 


cm 


SYS52227 ;: GOSUB529 
SYSs52239:FORDY=1T07983:N 
EXT: PRINT" (CLR) (BLU) ":P 
0KE532808, 12:P0KE53281,1 
2 
AȘ=" ( RVS) " :FORI=1T039:A 
Ș=AȘ+" "NEXT 
PRINTVTȘ (2)AȘVTȘ (23 )AȘ 
FORI=1T022: PRINTVTȘ (1)" 
(RVS) "TAB(38)" ":NEXT 
PRINTVTȘ (9) TAB (18) 
ÎBLK) COMPLETE SCREEN” 
PRINTVIȘTII)TAB(I1) "MAT 
ERIALIZATIONS" 
PRINTVIȘ(13)TAB(12)" 
(2 SPACES)ARE EASY" :SYS 
52227: GOSUB5293 
SYs52238 
PRINT"E53 (CLR) "CHR$(9)C 
HRȘ (142) :SYs52224 
PRINT" (CLR) "VT$(7)" 
(BLK)(3 RIGHT)ALL CHARA 
CTERS ARE HERE," 
PRINTVT$ (9)"(3 RIGHT)AL 
SO ÎRVS)ÎBLU) REVERSE 
(OFF) (BLK)AND"“ 
PRINTVTȘ(11)"(3 RIGHT) 
(BLU) QASZXE+3RB3EVĂ 
(BLK)- CHARACTER GRAPHI 
CS. (BLK)"“ 
SYS52227 :GOSUB528:SYs52 
238 
PRINT" (CLR) "VTȘ (12) "AND 
PROGRAMMABLE CHARACTER 
S ARE A SNAPI" 
FORI=8T07 : READA: POKE489 
60+1,A:NEXT 
DATA 60,69, 24,255,24,68 
„36,182 
PRINTVTȘ (14) TAB( 16)" 
(BLU) e e(BLK)"+SsYs522 
27 
GOSUB529: SYs52238 
PRINT"E53 (CLR) "CHR$(9)C 
HRȘ (14) :SYs52224 
PRINTVT$(9)TAB(7)"(BLK) 


THE SPEED OF THE FADE I 


N" 
PRINTVTȘ (11) TAB (7) "AND 
(SPACE)FADE OUT MAY ALS 
O BE" 
PRINTVTŞ (13 )TAB (7) "CONT 
ROLLED. .." 
PRINTVTȘ (15) TAB(16)" 
(RVS) (BLU) FAST " 
POKE688, 8: SYS52227 : GOSU 
8558: SYSs52239:G0SUB558 


4298 PRINTVT$(15)TAB(14)" 
ÎRVS) REGULAR " 
POKE686, 25:5Ys52227:G0s 
UB558: SYS52230:G0SUB558 
PRINTVTȘ(15)TAB(14)" 
(OFF) (2 SPACES)ÎRVS) SL 
OW „ 
POKE689, 59: SYs52227:G0s 
UB559: SYS52238:GOSUB558 
: POKE689,8 
PRINT" (CLR) "VTȘ(9)TAB(1 
2) "(BLK) ( ÎBLUJRIBLK) )ES 

TART DEMO“ 


PRINTVTȘ(11)TAB (12) ” ( 
(BLUJE(BLK]) )XIT TO BASI 


439 


448 
458 


4683 


478 


c 

SyYs52227 

GETAȘ : IFAȘ="R"THENSYS52 
238: RUN 
I1FAȘ="E"THENSYS52239:SY 
S52233: END 

GOTO0498 

PRINTVT$ (18) "(5 RIGHT)P 
RESS A KEY TO DE-MATERI 
ALIZE" 

539 GETAȘ: IFAȘ=" “'THEN538 
549 RETURN 

550 FORDY=1T01098:NEXT: RETU 
RN 


482 
499 


598 


519 
520 





Ominous Error Noise 
19 POKE209, 9: POKE219, 212:P0 
KE211,9:PRINT"9D HUEVĂ 
(RVS)EUă (oFF)eeaeege+ua* 
Qaeeaao"; 


Ringing Telephone 
10 POKE289, 8: POKE219, 212:P0 
KE211, 0:PRINT"95* (RVS)E 
(OFF) se (RVvS)EAJ (OFF) LAGE 
GeeQA F*Q (RVS)EAJL(OFF)6e 
a(RVs)=*; 


Plane Engine 


19 POKE209, 8: POKE218, 212:P0 
KE211,9:PRINT"(RVS)C 
(OFFJA(RVvS) P(OFFJUG 
(RVS)EA3 (OFF) LAQECORE+3A 
PACEAJGee(Rvs)<"; 


Spaceship 


19 POKE289, 9: POKE219, 212:P0 
KE211, 0: PRINT" (RVS)£ 
(orF)G (RvSs)8(O0FF)WG 
(RVS)EAJE*3 (OFF) 'Qaue 
(Rvs) EA3 (OFF) EAJDEPACEeT 
(RVS)EEJ(OFF]?"; 











































































































































































































































































































